按行排序的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 语句的结果。

相关内容

热门资讯

举措透视!wepoker游戏安... 举措透视!wepoker游戏安装教程,wepoker有辅助插件吗,第三方教程(有挂秘笈)-哔哩哔哩>...
发现透视"wepok... 发现透视"wepoker辅助工具好用吗"开挂(透视)辅助器(9分钟了解高科技教程)发现透视"wepo...
模块透视!hhpoker可以控... 【亲,hhpoker可以控制吗 这款游戏可以开挂的,确实是有挂的,很多玩家在这款hhpoker可以控...
实测透视"微扑克发牌... 实测透视"微扑克发牌机制详解"开挂(透视)辅助器(玩家亲测黑科技教程)实测透视"微扑克发牌机制详解"...
秘籍透视!wepoker可以透... >>您好:wepoker辅助器官方确实是有挂的,很多玩家在这款wepoker辅助器官方游戏中打牌都会...
正版透视"wepok... 正版透视"wepoker透视软件下载"开挂(透视)辅助软件(科技分享揭秘教程)正版透视"wepoke...
模块透视!pokemmo辅助官... wepoker模拟器哪个好用 无需打开直接搜索微信:136704302本司针对手游进行,选择我们的四...
曝光透视"微扑克辅助... 曝光透视"微扑克辅助期是干嘛的"开挂(透视)辅助工具(记者发布总结教程)曝光透视"微扑克辅助期是干嘛...
大纲透视!约局吧辅助脚本,aa... aapoker安装包怎么使用是一款可以让一直输的玩家,快速成为一个“必胜”的ai辅助神器,有需要的用...
必看透视"微扑克辅助... 必看透视"微扑克辅助器官网入口"开挂(透视)辅助脚本(今日公布必赢教程)必看透视"微扑克辅助器官网入...