我需要根据一列的值从 data.frame 生成箱。我已经尝试过“剪切”功能。
例如:我想在数据框中的“AirTDay”列中创建气温值箱:
AirTDay (oC)
8.16
10.88
5.28
19.82
23.62
13.14
28.84
32.21
17.44
31.21
我需要 bin 间隔包含与该初始值相差 2 摄氏度范围内的所有值(即 8-9.99、10-11.99、12-13.99 ...),并用该范围的平均值标记(即9.5、10.5、12.5...),并尊重空白单元格,在 bins 列中返回“NA”。
输出应如下所示:
Air_T (oC) TBins
8.16 8.5
10.88 10.5
5.28 NA
NA
19.82 20.5
23.62 24.5
13.14 14.5
NA
NA
28.84 28.5
32.21 32.5
17.44 18.5
31.21 32.5
我已经做到了:
setwd('C:/Users/xxx')
temp_data <- read.csv("temperature.csv", sep = ",", header = TRUE)
TAir <- temp_data$AirTDay
Tmin <- round(min(TAir, na.rm = FALSE), digits = 0) # is start at minimum value
Tmax <- round(max(TAir, na.rm = FALSE), digits = 0)
int <- 2 # bin ranges 2 degrees
mean_int <- int/2
int_range <- seq(Tmin, Tmax + int, int) # generate bin sequence
bin_label <- seq(Tmin + mean_int, Tmax + mean_int, int) # generate labels
temp_data$TBins <- cut(TAir, breaks = int_range, ordered_result = FALSE, labels = bin_label)
输出表看起来是正确的,但由于某种原因,它显示了一个连续的附加列,改变了列名,并折叠了所有值以消除空白单元格。像这样的东西:
Air_T (oC) TBins
1 8.16 8.5
2 10.88 10.5
3 5.28 NA
4 19.82 20.5
5 23.62 24.5
6 13.14 14.5
7 28.84 28.5
8 32.21 32.5
9 17.44 18.5
10 31.21 32.5
关于我在哪里失败以及如何解决它的任何想法?