討論串[問題] 每行依比例隨機抽樣
共 4 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓0(0推 0噓 1→)留言1則,0人參與, 7年前最新作者pp61022 (fight)時間7年前 (2018/05/19 18:15), 7年前編輯資訊
1
0
0
內容預覽:
[問題類型]:. 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R寫出來). [軟體熟悉度]:. 使用者(已經有用R 做過不少作品). [問題敘述]:. 請簡略描述你所要做的事情,或是這個程式的目的. 我有一個矩陣 10*100 (n=10, p=100). 我想要把這100行,每行都依比例隨
(還有655個字)

推噓2(2推 0噓 5→)留言7則,0人參與, 7年前最新作者andrew43 (討厭有好心推文後刪文者)時間7年前 (2018/05/19 18:49), 編輯資訊
1
0
0
內容預覽:
# 決定誰要變成0的矩陣. ind <- replicate(100, sample(c(rep(T, 6), rep(F, 4)))). # 按ind改M. M <- matrix(1:1000, 10, 100). M[ind] <- 0. M. # check. apply(ind, 2, s
(還有24個字)

推噓1(1推 0噓 0→)留言1則,0人參與, 7年前最新作者celestialgod (天)時間7年前 (2018/05/19 19:36), 編輯資訊
0
0
0
內容預覽:
產生太多無用資訊,造成不必要的浪費. 最簡單的做法就是直接for就好. nrow <- 10L. numValueChange <- 6L. ncol <- 5e5L. st <- proc.time(). M <- matrix(sample(1:100, nrow*ncol, TRUE), nr
(還有432個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者HumuHumu (呼姆呼姆)時間7年前 (2018/05/19 23:53), 編輯資訊
0
0
0
內容預覽:
提供另一個方法一行搞定. data為你的資料. apply(data,2,function(x){ x[sample(1:length(x),6)]=0;return(x) }). 可以把6換成換成其他值. --. 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.32.209.214.
首頁
上一頁
1
下一頁
尾頁