如何在R语言中按自定义参数生成含两列的表格?
解决R语言生成两列表格的问题
首先修正你第一列的代码,你定义了lower_bound和upper_bound但在seq()里误用了未定义的start/end,调整后生成第一列序列:
current_point <- 50 lower_bound <- 40 upper_bound <- 60 size <- 2 # 生成第一列数据 col1 <- seq(lower_bound, upper_bound, by = size)
基于你给出的value_A <- 3和fixed_point <- 54,假设第二列的逻辑是:以fixed_point为基准,每偏离一个步长size,数值对应增减value_A(小于fixed_point的点数值随距离增大而增加,大于的则随距离增大而减少),可以用以下代码生成第二列:
value_A <- 3 fixed_point <- 54 # 生成第二列数据 col2 <- value_A * (fixed_point - col1) / size
最后将两列组合成表格(数据框):
# 组合为表格 result_table <- data.frame(第一列 = col1, 第二列 = col2) # 查看结果 print(result_table)
运行后输出的表格如下:
| 第一列 | 第二列 |
|---|---|
| 40 | 21 |
| 42 | 18 |
| 44 | 15 |
| 46 | 12 |
| 48 | 9 |
| 50 | 6 |
| 52 | 3 |
| 54 | 0 |
| 56 | -3 |
| 58 | -6 |
| 60 | -9 |
如果你的第二列逻辑需要反向(大于fixed_point的点数值随距离增大而增加),只需把第二列的计算式改成value_A * (col1 - fixed_point) / size即可。
内容的提问来源于stack exchange,提问作者Bubbles
相关产品推荐
相关产品推荐

