#新数组内容保存至data.csv文件中
rm(list=ls())
#生成100个[-100,100]均匀分布随机数向量，种子为35
set.seed(35)
x <-runif(100,-100,100)
x
#将向量转换为10*10数组
x <-matrix(x,10,10)
x
#将数组元素转化为整数值
x <-ceiling(x)
x
#无行头，无列头，逗号分隔indow
write.table(x, file='data.csv',row.names=FALSE,col.names=FALSE,sep=',')运行结果：
版权声明：本文为weixin_38560851原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接和本声明。