R语言初体验

了解了解,感觉蛮有意思的

慕课网对应课程:机器学习中的统计学基础


环境搭建

OS:macOS 10.13.4

使用homebrew安装R

1
brew install r

安装GUI工具RStudio


初步尝试

  • 变量赋值
  • 序列
  • 库函数的使用

计算一组数据的平均值和中位数

1
2
3
4
5
6
7
8
# 进行赋值
data<-c(1,2,3,4,5)

# 求平均数
m1<-mean(data)

# 求中位数
m2<-mean(data)

进一步尝试

  • 函数封装
  • table使用

注意,函数的return返回值需要加括号

计算一组一组数据的众数(先求出各个数值的个数,再求出其最大值)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
mode<-c(1,2,3,4,4,5,6,6)
b<-table(mode)

b
# mode
# 1 2 3 4 5 6
# 1 1 1 2 1 2

as.numeric(names(b))
# 1 2 3 4 5 6

b == max(b)
# mode
# 1 2 3 4 5 6
# FALSE FALSE FALSE TRUE FALSE TRUE

# 求众数
as.numeric(names(b)[b==max(b)])
# 4 6

# 使用函数进行封装
zhongshu <- function(x) {
t<-table(x)
return(as.numeric(names(t)[t==max(t)]))
}

# 使用函数
zhongshu(b)
# 4 6