R语言
流程控制
#if else
score <- 79(score是向量,在R语言中最小单位就是向量)
str(score)查看score的详细信息
if(score>=80){
print (“A”)
}else if (score>=60){
print (“B”)
}else{
print (“C”)
}
运行时全部选中才可以得到结果
#for循环
num <- 1:10
for(i in num){
if(i%%2== 0){
print(i)
}
}
#实现的是求偶数
#while
num <- 5
while (num>0) {
print (num)
num<- num - 1
}
#定义函数
pow <-function(x,y){
result <- x^y
print(paste(x, “^”,y,"=",result))
}
pow(2,3)
num<- 1:10
my.fun <- function(x) {
x+1
}
sapply(num,my.fun)
#对1-10进行加1
sapply函数参考网址
#http://www.jianshu.com/p/8e04245bfe6d
data()
data (package = .packages (all.available = TRUE) )
#看数据集的前几行用head
head (airquality)
#nrow查看数据集有多少行
nrow (airquality)
#?了解数据集的具体信息或者每一列的意思
?airquality
若RStudio的安装路径为中文名称 画图会出现报错 在前边加一行代码dev.new(),就可以解决这个问题
dev.new()
?plot
plot(rock,col=“red”) #通过颜色名称
plot(rock,col=554)#通过颜色下标
plot (rock, col="#FF0000") #通过十六进制的颜色值
mycolor <- rgb (red=255,green=0, blue=0,max=255)
plot (rock,col= mycolor) #通过RGB值
以上几种不同的方式用来绘制散点图