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
◆
◆
