经管之家App
让优质教育人人可得
立即打开
全部版块
我的主页
›
论坛
›
数据科学与人工智能
›
数据分析与数据科学
›
R语言论坛
求助
楼主
longguojun114
2075
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语言论坛
保研/调剂(考研)
爱问频道
MBA专版
商学院
文献求助专区
热门文章
对扩散语言模型开启了一次深度思考
CDA数据分析师:承接企业数据需求,解锁数据 ...
CDA 认证考试大纲 2025 重磅更新:一二级考 ...
【顶刊方法,24重磅更新!】2001-2024上市公司 ...
【重磅更新,24顶刊方法!】2001-2024上市公司 ...
Gemini准确率从21%飙到97%!谷歌只用了这一 ...
CDA 认证考试大纲 2025 重磅更新:一二级考 ...
智能工厂发展报告(2025年)
如盈财女:1.22黄金还有调整空间,原油回踩 ...
电影《摔跤吧爸爸》中的经典台词
推荐文章
【必看】【本版版规,欢迎发悬赏贴求助】
26年寒假天津站|Gemini论文写作&数据分析 ...
2026JG学术冬训营:从Stata初高到Python机器 ...
关于如何利用文献的若干建议
关于学术研究和论文发表的一些建议
关于科研中如何学习基础知识的一些建议 (一 ...
一个自编的经济学建模小案例 --写给授课本科 ...
AI智能体赋能教学改革: 全国AI教育教学应用 ...
2025中国AIoT产业全景图谱报告-406页
关于文献求助的一些建议
说点什么
分享
微信
QQ空间
QQ
微博
扫码加好友,拉您进群
各岗位、行业、专业交流群