经管之家App
让优质教育人人可得
立即打开
全部版块
我的主页
›
论坛
›
数据科学与人工智能
›
数据分析与数据科学
›
R语言论坛
求助
楼主
longguojun114
2001
4
收藏
2009-07-22
请教高手,怎样用R写个通用函数来求矩阵中的最大值以及最大值所在的位置?
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
全部回复
沙发
mfr1988926
2009-7-23 14:53:53
我也是初学者,函数写的可能很逊,但应该能解决你的问题了
matrixmax=function(x){
n=nrow(x);m=ncol(x)
x=t(x)
x=as.vector(x)
maxx=max(x)
whichmax=which(x==max(x))
wm=length(whichmax)
n1=whichmax/m;m1=whichmax%%m
for(k in 1:wm){
if(!is.integer(n1)) n1=ceiling(n1)
if(is.integer(n1)) n1=n1
}
for(i in 1:wm){
if(m1[i]==0)m1[i]=m
if(m1[i]!=0) m1[i]=m1[i]
}
list(最大值=maxx,最大值位置=cbind(n1,m1))
}
例子:
> matrixmax(matrix(c(1,4,3,2,8,4,8,6,7,3,4,7),3,4))
$最大值
[1] 8
$最大值位置
n1 m1
[1,] 1 3
[2,] 2 2
解释:矩阵最大值为8,位置在1行3列跟2行2列
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
藤椅
longguojun114
2009-7-24 13:15:02
非常感谢!!,我是菜鸟了,以后请我指教了,能不能留个联系方式啊?
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
板凳
longguojun114
2009-7-24 13:15:39
以后请多指教了!
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
报纸
mfr1988926
2009-7-24 20:50:13
哈哈,我也是菜鸟,我就学了一个多月吧……我的空间有联系方式~
3#
longguojun114
扫码加我 拉你入群
请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
相关推荐
请教高手:激励成本对产出的影响?
请教高手一问题?
请教高手
请教高手,如何分析解释变量的相对重要性
请教高手:关于政府的转移支付
请教高手,在税收里,拉动和拉动率、贡献和贡献率是怎么定义的?
[求助]请教高手们一个问题
请教高手:农村科技人才与农村实用人才的区别
请教高手,求二十元函数的最大值
请教高手,如何求某一变量的最大值
栏目导航
R语言论坛
金融工程(数量金融)与金融衍生品
休闲灌水
马克思主义经济学
不动产与金融市场
商学院
热门文章
CDA 数据分析师:线性回归实战指南 —— 从 ...
世界上最简单的会计书(高清pdf版)
20XX年扶贫办雨露计划工作方案
AI应用新范式:从工具革命到“超级OS”的演 ...
同心动力携手山西金控,共筑金融企业“以人 ...
R语言实战 机器学习与数据分
蔡定创教授、李云庆院长致联合国秘书长古特 ...
2022年北京冬奥会英语观后感【10篇】
R语言预测实战
瓦尔拉斯方程组及其求解历史
推荐文章
AI狂潮席卷学术圈,不会编程也能打造专属智 ...
最快1年拿证,学费不足5W!热门美国人工智能 ...
关于如何利用文献的若干建议
关于学术研究和论文发表的一些建议
关于科研中如何学习基础知识的一些建议 (一 ...
一个自编的经济学建模小案例 --写给授课本科 ...
AI智能体赋能教学改革: 全国AI教育教学应用 ...
2025中国AIoT产业全景图谱报告-406页
关于文献求助的一些建议
几种免费下载文献的方法----我的文献应助经
说点什么
分享
微信
QQ空间
QQ
微博
扫码加好友,拉您进群
各岗位、行业、专业交流群