R中的socket连接

　　在R中实现socket连接的函数是sockeConnection，在该函数中可以通过参数port设定端口号，参数server设为TRUE或FALSE来说明创建的是服务器端或客户端。在R中，通过启动两个进程，一个运行服务器端程序，一个运行客户端程序，就可实现socket连接了。代码如下：

## server
i = 0
con1 = socketConnection(port=8888, server=TRUE)
repeat{
  i = i + 1
  print(i)
  write.table(x=data.frame(v=1:10), file=con1, col.names=F, row.names=F)
  if(i > 10) break
}
close(con1)

## client
t = 0
con2 = socketConnection(port=8888, blocking=T)
repeat{
  t = t+1
  cat("t", t, "
")
  A = read.table(file=con2, nrow=10)
  print(A)
}
close(con2)