R中按行的增长率_R - Fatal编程技术网

R中按行的增长率

R中按行的增长率,r,R,我有一个数据框架，在特定的时间段内，每行只有少量的财务数据，我想计算每行的增长率，无论是在新的列中还是在新的数据框架中，我正在处理的数据看起来像这样 df.new <- t(freeny.x) # Example dataframe df.new为了简单起见，我只取了数据帧的前6列，然后就可以了 (df[, 2:ncol(df)] - df[,-ncol(df)])/df[,-ncol(df)] * 100 # [,1]

我有一个数据框架，在特定的时间段内，每行只有少量的财务数据，我想计算每行的增长率，无论是在新的列中还是在新的数据框架中，我正在处理的数据看起来像这样

 df.new <- t(freeny.x) # Example dataframe

df.new为了简单起见，我只取了数据帧的前6列，然后就可以了
(df[, 2:ncol(df)] -  df[,-ncol(df)])/df[,-ncol(df)] * 100

#                           [,1]      [,2]      [,3]      [,4]      [,5]
#lag quarterly revenue -0.045473 -0.011260  0.267194 -0.020987  1.072278
#price index           -0.165606 -0.270726 -0.082313 -0.968717 -0.315935
#income level           0.076961  0.095098  0.160175  0.169507  0.244088
#market potential       0.026215  0.031603  0.024658  0.019260  0.017715

这将返回n-1
列如果您需要第一列带有NA
，您可以cbind
它
cbind(NA, (df[, 2:ncol(df)] -  df[,-ncol(df)])/df[,-ncol(df)] * 100)

为确保计算正确，从第一行取前两个值
(8.7924  - 8.7964)/8.7964 * 100
#[1]-0.045473

它在最终输出的第1行第1列中给出了相同的值，如图所示
数据
df <- df.new[, 1:6]
df
#                         [,1]    [,2]    [,3]    [,4]    [,5]    [,6]
#lag quarterly revenue  8.7964  8.7924  8.7914  8.8149  8.8130  8.9075
#price index            4.7100  4.7022  4.6894  4.6856  4.6402  4.6255
#income level           5.8211  5.8256  5.8311  5.8405  5.8504  5.8646
#market potential      12.9699 12.9733 12.9774 12.9806 12.9831 12.9854

df为了简单起见，我只取了数据帧的前6列，然后就可以了
(df[, 2:ncol(df)] -  df[,-ncol(df)])/df[,-ncol(df)] * 100

#                           [,1]      [,2]      [,3]      [,4]      [,5]
#lag quarterly revenue -0.045473 -0.011260  0.267194 -0.020987  1.072278
#price index           -0.165606 -0.270726 -0.082313 -0.968717 -0.315935
#income level           0.076961  0.095098  0.160175  0.169507  0.244088
#market potential       0.026215  0.031603  0.024658  0.019260  0.017715

这将返回n-1
列如果您需要第一列带有NA
，您可以cbind
它
cbind(NA, (df[, 2:ncol(df)] -  df[,-ncol(df)])/df[,-ncol(df)] * 100)

为确保计算正确，从第一行取前两个值
(8.7924  - 8.7964)/8.7964 * 100
#[1]-0.045473

它在最终输出的第1行第1列中给出了相同的值，如图所示
数据
df <- df.new[, 1:6]
df
#                         [,1]    [,2]    [,3]    [,4]    [,5]    [,6]
#lag quarterly revenue  8.7964  8.7924  8.7914  8.8149  8.8130  8.9075
#price index            4.7100  4.7022  4.6894  4.6856  4.6402  4.6255
#income level           5.8211  5.8256  5.8311  5.8405  5.8504  5.8646
#market potential      12.9699 12.9733 12.9774 12.9806 12.9831 12.9854

df“我正在处理的数据看起来像这样”我没有看到任何（可复制和可复制粘贴的）数据。你忘了包括样本数据吗？df.new My mission@Vikram；以前从未见过freeny.x
。。。算了吧！“我正在处理的数据看起来像这样”我没有看到任何（可复制和可复制粘贴的）数据。你忘了包括样本数据吗？df.new My mission@Vikram；以前从未见过freeny.x
。。。算了吧！