#function paste 分隔符函数
data1 <- c('A','B','C')
data2 <- c(1:3)
i <- paste(data1,data2,sep="-")
print(i)
#function mean 平均数
data3 <- c(1,2,3,4,5,6,6)
d <- mean(data3)
print(d)
#function sd 均值标准差
data4 <- c(10.1,9.7,6.6,3.2,9.5,7.9,1.2)
e <- sd(data4)
print(e)
#function cor 计算列与列之间的相关系数
f <- cor(data3,data4)
print(f)
#functon plot 以data3为x,date4为y作图
g <- plot(data3,data4)
print(g)
#loop 循环
x <- 0
for(i in 1:100){x<-x+i}
print(x) // 5500
#file 读取文件
data <- read.table("F:/t_signon.txt")
运行结果图