#function paste 分隔符函数data1 <- c('A','B','C')data2 <- c(1:3)i <- paste(data1,data2,sep="-")print(i)#f
#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 <- 0for(i in 1:100){x<-x+i}print(x) // 5500#file 读取文件data <- read.table("F:/t_signon.txt")运行结果图
