R语言笔记——在行上应用函数一
本个专题将介绍R语言的一些基本技能和实用技巧。本教程说明了如何在行上应用函数。
样本
数据
" data = read.table(text=
+ X Y Z
+ 6 5 0
+ 6 3 NA
+ 6 1 5
+ 8 5 3
+ 1 NA 1
+ 8 7 2
+ 2 0 2", header=TRUE)
# X Y Z
# 1 6 5 0
# 2 6 3 NA
# 3 6 1 5
# 4 8 5 3
# 5 1 NA 1
# 6 8 7 2
# 7 2 0 2
当我们想将功能应用于矩阵或数据框的行时,不能应用于列。
计算跨行
的最大值
apply(data, 1, max)
# [1] 6 NA 6 8 NA 8 2
如果连续存在NA,则返回NA。要忽略NA,可以使用以下代码行。
apply(data, 1, max, na.rm = TRUE)
# [1] 6 6 6 8 1 8 2
计算每行
的平均值
apply(data, 1, mean)
## [1] 3.666667 NA 4.000000 5.333333 NA 5.666667 1.333333
apply(data, 1, mean, na.rm = TRUE)
## [1] 3.666667 4.500000 4.000000 5.333333 1.000000 5.666667 1.333333
计算每一
行的0值
apply(data == 0, 1, sum, na.rm= TRUE)
# [1] 1 0 0 0 0 0 1
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆
◆ble
◆
◆