如何在r中用na替换inf值
可以使用以下方法将R中的Inf值替换为NA值:
方法一:将Vector中的Inf替换为NA
x[is. infinite (x)] <- NA
方法2:将数据框所有列中的Inf替换为NA
df[sapply(df, is. infinite )] <- NA
方法3:在数据框的特定列中将 Inf 替换为 NA
df[c(' col1 ', ' col2 ')][sapply(df[c(' col1 ', ' col2 ')], is. infinite )] <- NA
本教程通过以下数据框解释了如何在实践中使用每种方法:
#create data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
position=c('G', 'G', 'F', 'F', 'G', 'G', 'F', 'F'),
points=c(10, 10, 8, 14, 15, 15, 17, 17))
#view data frame
df
team position points
1 AG 10
2 AG 10
3AF 8
4 AF 14
5 BG 15
6 BG 15
7 BF 17
8 BF 17
示例 1:将向量中的 Inf 替换为 NA
以下代码展示了如何将向量中的所有 Inf 值替换为 NA 值:
#create vector with some Inf values
x <- c(4, 12, Lower, 8, Lower, 9, 12, 3, 22, Lower)
#replace Inf values with NA
x[is. infinite (x)] <- NA
#view updated vector
x
[1] 4 12 NA 8 NA 9 12 3 22 NA
请注意,原始向量中的所有 Inf 值均已替换为 NA 值。
示例 2:在数据帧的所有列中将 Inf 替换为 NA
下面的代码展示了如何在数据框的每一列中用 NA 值替换 Inf 值:
#create data frame
df <- data. frame (x=c(4, 5, 5, 4, Inf, 8, Inf),
y=c(10, Lower, Lower, 3, 5, 5, 8),
z=c(Inf, 5, 5, 6, 3, 12, 14))
#view data frame
df
X Y Z
1 4 10 Lower
2 5 Lower 5
3 5 Lower 5
4 4 3 6
5 Lower 5 3
6 8 5 12
7 Lower 8 14
#replace Inf values with NA values in all columns
df[sapply(df, is. infinite )] <- NA
#view updated data frame
df
X Y Z
1 4 10 NA
2 5 NA 5
3 5 NA 5
4 4 3 6
5 NA 5 3
6 8 5 12
7 NA 8 14
请注意,数据帧每列中的 Inf 值已替换为 NA 值。
示例 3:在数据帧的特定列中将 Inf 替换为 NA
以下代码展示了如何在数据帧的特定列中将 Inf 值替换为 NA 值:
#create data frame
df <- data. frame (x=c(4, 5, 5, 4, Inf, 8, Inf),
y=c(10, Lower, Lower, 3, 5, 5, 8),
z=c(Inf, 5, 5, 6, 3, 12, 14))
#view data frame
df
X Y Z
1 4 10 Lower
2 5 Lower 5
3 5 Lower 5
4 4 3 6
5 Lower 5 3
6 8 5 12
7 Lower 8 14
#replace Inf values with NA values in columns 'x' and 'z' only
df[c(' x ', ' z ')][sapply(df[c(' x ', ' z ')], is. infinite )] <- NA
#view updated data frame
df
X Y Z
1 4 10 NA
2 5 Lower 5
3 5 Lower 5
4 4 3 6
5 NA 5 3
6 8 5 12
7 NA 8 14
请注意,“x”和“y”列中的 Inf 值已替换为 NA 值。
然而,“y”列中的 Inf 值保持不变。
其他资源
以下教程解释了如何在 R 中执行其他常见任务: