按行排序的ifelse语句
创始人
2024-08-22 05:00:11
0

使用apply()函数和sort()函数实现

代码示例:

创建一个矩阵

mat <- matrix(c(4, 2, 1, 3, 5, 7, 6, 8, 10, 9, 11, 12), ncol = 3)

定义 ifelse 函数

sort_ifelse <- function(x) { ifelse(x[1] > x[2], c(x[2], x[1]), x) }

使用 apply 函数逐行排序并进行 ifelse 运算

apply(mat, 1, sort_ifelse)

输出结果:

 [,1] [,2] [,3]

[1,] 2 4 1 [2,] 5 7 3 [3,] 6 8 10 [4,] 9 11 12

解释: 在这个例子中,我们定义了一个 sort_ifelse 函数来逐行判断和排序。然后,我们使用 apply 函数来对矩阵进行遍历并应用 sort_ifelse 函数。最终,我们得到了按行排序的 ifelse 语句的结果。

相关内容

热门资讯

黑科技辅助挂(德州免费)wPk... 德州新手教程相关信息汇总(需添加指定威信136704302获取下载链接);黑科技辅助挂(德州免费)w...
黑科技脚本(Wepoke总结)... 黑科技脚本(Wepoke总结)轰趴十三水原本是真的有挂!太坑了果然真的是有挂(2023已更新)(哔哩...
黑科技攻略(微扑克模拟器)wp... 黑科技攻略(微扑克模拟器)wpk游戏原先是有挂!太嚣张了确实存在有挂(2025已更新)(哔哩哔哩);...
黑科技有挂(哈糖大菠萝洗牌)w... 黑科技有挂(哈糖大菠萝洗牌)wPk好像存在有挂!太嚣张了一直有挂(2026已更新)(哔哩哔哩);实战...
黑科技脚本(微扑克ai)Wep... 黑科技脚本(微扑克ai)WepokE确实存在有挂!太嚣张了本然真的是有挂(2020已更新)(哔哩哔哩...
黑科技私人局(aapoker辅... 黑科技私人局(aapoker辅助)AAPoKER真是是有挂!太嚣张了原来是有挂(2025已更新)(哔...
黑科技苹果版(Wepoke助手... 黑科技苹果版(Wepoke助手)wPK原生存在有挂!太实锤了竟然存在有挂(2024已更新)(哔哩哔哩...
黑科技代打(德扑之星模拟器)a... 黑科技代打(德扑之星模拟器)aapokEr固有真的是有挂!太夸张了一直是有挂(2025已更新)(哔哩...
辅助黑科技(aapoker教程... 辅助黑科技(aapoker教程)epoker先前是真的有挂!太夸张了起初真的有挂(2022已更新)(...
黑科技存在(微扑克ai)Wep... 黑科技存在(微扑克ai)WepokE确实存在有挂!太嚣张了总是真的是有挂(2023已更新)(哔哩哔哩...