h**t
发帖数: 1678 | 1 拿到一个code 是从sql翻译过来的， 很繁复。 其中有很多类似于下类这样的分类：
m_prima_total <- ifelse(prima_total <= 557.71, 0,NA)
m_prima_total <- ifelse(prima_total > 557.71 & prima_total <= 763, (prima_
total - 557.71)/(763 - 557.71), m_prima_total)
m_prima_total <- ifelse(prima_total > 763 & prima_total <= 1185.96 , 1, m_
prima_total)
m_prima_total <- ifelse(prima_total > 1185.96 & prima_total <= 1832.04 , (
1832.04-prima_total)/( 1832.04- 1185.96), m_prima_total)
m_prima_total <- ifelse(prima_total > 1832.04 | is.na(prima_total) == TRUE ,
0, m_prima_total)
有什么R built in 的function可以简化这一类的coding? 在已知各个分界点的情况下
，把数据分组并给新值。 我觉得lapply一类的应该可以用； 但是不还要自己在定义
FUN，也不知有没有更好的。
感谢！ | l*********s
发帖数: 5409 | | h**t
发帖数: 1678 | 3 Thank you so much!!
This is exactly I'm looking for!!
【在 l*********s 的大作中提到】
: cut
| h**t
发帖数: 1678 | 4 Question again:
如何时时更新label (prima_total - 557.71)/(763 - 557.71)
谢谢 |
|
