R璇█鎬庝箞鎸夋潯浠跺悎骞跺垪
扬州沐宇科技
2024-03-26 17:02:55
鍦?R 璇█涓紝鍙互浣跨敤 ifelse() 鍑芥暟鏉ユ寜鏉′欢鍚堝苟鍒椼€備笅闈㈡槸涓€涓畝鍗曠殑绀轰緥锛?/p>
鍋囪鏈変竴涓暟鎹 df锛屽叾涓湁涓ゅ垪 x 鍜?y锛屾垜浠兂瑕佹牴鎹?x 鍒楃殑鍊兼潵閫夋嫨鍚堝苟鐨勫垪锛屽鏋?x 澶т簬 0锛屽垯閫夋嫨 y 鍒楋紝濡傛灉 x 灏忎簬 0锛屽垯閫夋嫨 x 鍒椼€?/p>
df <- data.frame(x = c(1, 2, -1, -2), y = c(10, 20, 30, 40))
df$merged <- ifelse(df$x > 0, df$y, df$x)
print(df)
杩欐浠ｇ爜灏嗘牴鎹?x 鍒楃殑鍊兼坊鍔犱竴涓柊鐨勫垪 merged锛屽鏋?x 澶т簬 0锛屽垯 merged 鍒楃殑鍊间负 y 鍒楃殑鍊硷紝濡傛灉 x 灏忎簬 0锛屽垯 merged 鍒楃殑鍊间负 x 鍒楃殑鍊笺€?/p>
上一条：android文件管理器如何打开
下一条：如何选择java xml的解析库
相关问答
