Re: [問題] grid生樣本 避免for迴圈
感謝 celestialgod 版主大大提點:
以前以為 *apply 家族的函數就已經是向量化(vectorized)的寫法了
查了資料才發現其實底層背後還是有 for 迴圈 (覺得震撼啊...)
試試看這樣的寫法
theta <- seq(0,1,len=100)
df <- rep(19,len=100)
n <- rep(20,len=100)
vrt <- Vectorize(rt)
x <- vrt(n=n, df=df, ncp=1/theta)
於是 x[,1] ... x[,100] 就是100個 n 等於20 然後對應各自 delta 值的 t 分配樣本了
(但是不知道 df, n 的預先定義有沒有意義?)
請版上各位高手再指點~ 謝謝大家
======
補充:
但還是有查到 *apply function 的好處:
1. 程式易讀性
2. 會 pre-allocate 向量的記憶體空間
2. 只影響區域變數不會改變全域變數
ref: https://www.r-bloggers.com/vectorization-in-r-why/
※ 引述《ntpuisbest (阿龍)》之銘言:
: n <- 20
: theta=seq(0,1,len=100)
: rt(n ,1/theta )
: 如題
: 我想要生100組 ,每組都是n=20的t分配樣本
: 只是這100組的theta都不一樣
: 我像上面那樣打 只會回傳20個樣本
: 並不是我想要的 2000個樣本 請問要如何打才能要我要的結果
: 想避免for loop
: 用loop的話 我知道怎麼做
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.160.3.67
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1553700002.A.12F.html
推
04/11 07:59,
5年前
, 1F
04/11 07:59, 1F
→
04/11 08:00,
5年前
, 2F
04/11 08:00, 2F
→
04/11 08:01,
5年前
, 3F
04/11 08:01, 3F
→
04/11 08:32,
5年前
, 4F
04/11 08:32, 4F
→
04/11 08:32,
5年前
, 5F
04/11 08:32, 5F
→
04/11 08:32,
5年前
, 6F
04/11 08:32, 6F
→
04/11 08:32,
5年前
, 7F
04/11 08:32, 7F
推
04/11 23:57,
5年前
, 8F
04/11 23:57, 8F
→
04/11 23:59,
5年前
, 9F
04/11 23:59, 9F
推
04/12 00:02,
5年前
, 10F
04/12 00:02, 10F
→
04/12 00:04,
5年前
, 11F
04/12 00:04, 11F
→
04/12 00:05,
5年前
, 12F
04/12 00:05, 12F
→
04/12 14:02,
5年前
, 13F
04/12 14:02, 13F
→
04/12 14:02,
5年前
, 14F
04/12 14:02, 14F
→
04/12 14:02,
5年前
, 15F
04/12 14:02, 15F
→
04/12 14:02,
5年前
, 16F
04/12 14:02, 16F
推
04/12 14:03,
5年前
, 17F
04/12 14:03, 17F
推
04/12 14:03,
5年前
, 18F
04/12 14:03, 18F
推
04/12 14:36,
5年前
, 19F
04/12 14:36, 19F
→
04/12 14:39,
5年前
, 20F
04/12 14:39, 20F
→
04/12 19:50,
5年前
, 21F
04/12 19:50, 21F
→
04/12 19:50,
5年前
, 22F
04/12 19:50, 22F
→
04/12 19:51,
5年前
, 23F
04/12 19:51, 23F
討論串 (同標題文章)
R_Language 近期熱門文章
PTT數位生活區 即時熱門文章