作者celestialgod (天)
看板R_Language
标题Re: [问题] 矩阵生成
时间Wed Sep 16 08:15:23 2015
要写很多行QQ
# 第一种
nr = nc = 4
m = matrix(0, nr, nc)
m[row(m) == col(m)] = 2
m[1, 1] = 1
m[nrow(m), nrow(m)] = 1
m[row(m) == col(m) - 1] = -1
m[row(m) == col(m) + 1] = -1
m[1, 2] = 0
m[nrow(m), nrow(m)-1] = 0
# 第二种
nr = nc = 4
m = matrix(0, nr, nc)
m[row(m) == col(m)] = c(1, rep(2, nrow(m)-2), 1)
m[row(m) == col(m) - 1] = c(0, rep(-1, nrow(m)-2))
m[row(m) == col(m) + 1] = c(rep(-1, nrow(m)-2), 0)
※ 引述《hankckdy (汉克ㄦ)》之铭言：
: [问题类型]:
: 程式谘询(我想用R 做某件事情，但是我不知道要怎麽用R 写出来)
: [软体熟悉度]:
: 新手(没写过程式，R 是我的第一次)
: [问题叙述]:
: Create a square matrix, say A, with entries aii = 2, i = 2, . . . , n 1,
: a11 = ann = 1, ai,i+1 = ai,i-1 = -1 , and aij = 0 elsewhere.
: 若写成4x4的矩阵的话 看起来应该是像这样
: 1 0 0 0
: -1 2 -1 0
: 0 -1 2 -1
: 0 0 0 1
: 请问要如何以程式码呈现呢?
: 谢谢
: 程式范例]:
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.205.27.107
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1442362526.A.17E.html
1F：推 hankckdy: 感谢回答 目前是R的新手 手中只有一本R for everyone可 09/16 12:06
2F：→ hankckdy: 参考 想请问板大有其他推荐的参考书籍或资源可以利用的 09/16 12:07
3F：→ hankckdy: 吗? 再次谢谢你!! 09/16 12:08
置底很多XD
我自己只有读过R in nutshell
※ 编辑: celestialgod (123.205.27.107), 09/16/2015 12:18:40
4F：推 thea: 版大好强ＱＱ 09/19 23:35