作者查詢 / diplazium
作者 diplazium 在 PTT [ Statistics ] 看板的留言(推文), 共85則
限定看板:Statistics
看板排序:
全部MiamiHeat476BigBanciao205Statistics85Wanhua85NBA66R_Language53Road_Running42Preschooler32BabyMother31PublicServan24Wine24Japan_Travel20NARUTO14LeBronJames13book12Storage_Zone10ONE_PIECE7Summer6DC5FSS5HarukiMuraka5homemaker5mknoheya5SAS5Wizards5AfterPhD4Drama4Evangelion4E-appliance3LaClippers3Windows3BLEACH2Crowd2JOJO2Key_Mou_Pad2LTK2TOEFL_iBT2BERSERK1Broad_Band1Coffee1FixMyHouse1forsale1Gintama1Google1Grizzlies1Hornets1Hunter1IME1mobilesales1NBAEasyChat1NCKU-StaGS001NCKU-StaGS011Notebook1Orl-Magic1PACERS1SOFTLIPA1Spurs1swim1teeth_salon1Wade1<< 收起看板(60)
2F→:我想到的是用regular expression方式來做,步驟如下:06/04 14:02
3F→:先把Label串成單一字串 test <- paste(query$Label,06/04 14:04
4F→:collapse="")06/04 14:05
5F→:再找出有"asiu"連續字符的啟始位置,06/04 14:05
6F→:test2 <- gregexpr("asiu", test)06/04 14:06
7F→:這個test2所比對到的"起始位置"就是你要找的連續列的06/04 14:08
8F→:開始列數囉06/04 14:09
9F→:現在才想到,這個方法只能用在每一個Label只有一個字元的06/04 17:13
10F→:情形,像"iu"這種的就會讓test2無法反映出正確的列數.06/04 17:14
11F→:只能請版上高手再想想其他方法囉......06/04 17:15
17F推:原來還可以這麼解決,black大真強!06/04 21:22
5F推:試試: result <- vector(length=length(v[,1]))03/20 23:08
6F→:result[which(v[,1]==a)] <- v[which(v[,1]==a),1]-a03/20 23:08
8F→:result[which(v[,1]!=a)] <- 12-a+v[which(v[,1]!=a),1]03/20 23:08
9F→:我試了一下這樣的vectorization 應該行得通03/20 23:15
2F推:x$var <- ifelse(x$firm==第幾家公司, 1, 0); year同理03/08 10:29
4F→:應該用不著使用迴圈(永遠要盡量避免用R的迴圈)03/08 10:30
6F推:很棒的教學文 非常感謝W大!03/08 10:25
1F推:每一rescaled column的平均值apply(scale(x), 2, mean)03/06 17:15
2F→:標準差:apply(scale(x), 2, sd)03/06 17:15
4F推:很棒的教學文!03/01 15:55
6F→:"警告訊息"是因為你的資料有相同值且樣本數較少,你可以02/17 13:25
7F→:看一下?cor.test中的參數"exact=NULL"說明02/17 13:26
8F→:基本上不影響相關係數的計算,只是p-value不準而已02/17 13:27
2F推:雖然不懂C++, 但要推一下Taiwan UseR Group~01/17 18:11
1F推:下"scale=TRUE, center=TRUE"就是做normalization了!12/13 22:43
2F→:一般都是要normalized後進行PCA12/13 22:43
3F推:請問下載後要如何安裝到R?我試了安裝下載的zip檔,但沒用12/11 15:52