第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號(hào)安全,請(qǐng)及時(shí)綁定郵箱和手機(jī)立即綁定
已解決430363個(gè)問題,去搜搜看,總會(huì)有你想問的

為數(shù)據(jù)幀選擇多個(gè)奇數(shù)或偶數(shù)列/行

為數(shù)據(jù)幀選擇多個(gè)奇數(shù)或偶數(shù)列/行

偶然的你 2019-12-03 10:41:51
R中有沒有辦法選擇許多非連續(xù)的,即奇數(shù)或偶數(shù)的行/列?我正在為主成分分析繪制載荷。我有84行數(shù)據(jù)按如下順序排序:x_1 y_1 x_2.....x_42 y_42現(xiàn)在,我正在為x和y加載圖創(chuàng)建數(shù)據(jù)框,如下所示:data.pc = princomp(as.matrix(data))x.loadings <- data.frame(x=data.pc$loadings[c(1, 3, 5, 7, 9, 11, 13 ,15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41), 1])yloadings <- data.frame(y=data.pc$loadings[c(2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42), 1])當(dāng)然有更簡單的方法可以做到這一點(diǎn)?
查看完整描述

3 回答

?
子衿沉夜

TA貢獻(xiàn)1828條經(jīng)驗(yàn) 獲得超3個(gè)贊

您始終可以使用seq生成序列:


even_indexes<-seq(2,42,2)

odd_indexes<-seq(1,41,2)

然后,


  x.loadings <- data.frame(x=data.pc$loadings[odd_indexes,1])


查看完整回答
反對(duì) 回復(fù) 2019-12-03
?
斯蒂芬大帝

TA貢獻(xiàn)1827條經(jīng)驗(yàn) 獲得超8個(gè)贊

當(dāng)邏輯向量用于索引編制時(shí),它們將被回收,以便獲得奇數(shù)列或奇數(shù)行


 calld[ c(TRUE,FALSE), ]  # rows

 calld[ , c(TRUE,FALSE) ] #columns

偶數(shù)行或列:


 calld[ !c(TRUE,FALSE), ]  # rows

 calld[ , !c(TRUE,FALSE) ] #columns

每三列:


  calld[ , c(TRUE,FALSE, FALSE) ]   #columns 1,4,7 , ....


查看完整回答
反對(duì) 回復(fù) 2019-12-03
  • 3 回答
  • 0 關(guān)注
  • 671 瀏覽

添加回答

舉報(bào)

0/150
提交
取消
微信客服

購課補(bǔ)貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動(dòng)學(xué)習(xí)伙伴

公眾號(hào)

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號(hào)