小编Pau*_*aul的帖子

这应该很简单,但我正在努力解决它.

我想将一个数据帧中的两列合并为一列.我有custemer ID(20227)和year(2009)的单独列.我想创建一个包含两者的新列(2009_20227).

我有一个数据框，其中包含行中的客户信息和列中的周期（月）。我将这种格式用于聚类目的。我想缩放行中的值。我可以用下面的代码来做，但是有一些问题：

1. 对于应该是简单操作的东西来说，代码太复杂了。
2. 在某些情况下，“scale”函数返回“NaN”。
3. 输入明确的客户名称 (vars=c("A","B",...) 将不起作用，因为真实数据有数千个客户。

这是我的示例数据和代码：

mydata 
  cust P1  P2 P3  P4 P5  P6 P7  P8 P9 P10 P11 P12 P13 P14 P15 P16 P17 P18 P19 P20
1    A  1 1.0  1 1.0  1 1.0  1 1.0  1 1.0   1 1.0   1 1.0   1 1.0   1 1.0   1 1.0
2    B  5 5.0  5 5.0  5 5.0  5 5.0  5 5.0   5 5.0   5 5.0   5 5.0   5 5.0   5 5.0
3    C  9 9.0  9 9.0  9 …

我有一个包含 53 列（ID 列加 52 个数值）的数据框（数据）。我可以添加一个具有以下平均值的列：

data$mean <- rowMeans(data[,2:51],na.rm = TRUE) # add mean of rows

但是，我不能用以下方法对中位数做同样的事情：

data$medians <- rowMedians(month.sum[,2:51],na.rm = TRUE) # add medians of rows

我安装了包含的包matrixStatsrowMedians，但它对我不起作用。