勘误5.4.5排版问题 - client.r文件代码

[bsspirit]

client.r文件代码

~ vi client.r
library(websockets)    #加载类库
client = websocket("ws://192.168.1.201",port=7681)   #创建客户端实例
rece<-function(DATA, WS, HEADER) {   D=''   if(is.raw(DATA)){     cat("raw data")     D = rawToChar(DATA)   }   cat("==>",D,"\n")}   #监听receive
set_callback("receive",rece, client)
websocket_write("2222", client)   #向服务器发请求
service(client)    #输出服务器的返回值
websocket_close(client)    #关闭连接

代码没换行，改为：

library(websockets)    #加载类库
client = websocket("ws://192.168.1.201",port=7681)   #创建客户端实例
rece<-function(DATA, WS, HEADER) {   
    D=''   
    if(is.raw(DATA)){     
        cat("raw data")     
        D = rawToChar(DATA)   
    }   
    cat("==>",D,"\n")
}   
set_callback("receive",rece, client)  #监听receive
websocket_write("2222", client)   #向服务器发请求
service(client)    #输出服务器的返回值
websocket_close(client)    #关闭连接
}