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

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

用R中的“ paste”創(chuàng)建一個(gè)變量名?

用R中的“ paste”創(chuàng)建一個(gè)變量名?

見(jiàn)下文: paste("perf.a", "1", sep="")    [1] "perf.a1"如果我要給賦值perf.a1怎么辦?我嘗試了as.name,as.symbol等等,但無(wú)濟(jì)于事:as.name(paste("perf.a", "1", sep="")) = 5Error in as.name(paste("perf.a", "1", sep = "")) = 5 :   target of assignment expands to non-language objectas.symbol(paste("perf.a", "1", sep="")) = 5Error in as.symbol(paste("perf.a", "1", sep = "")) = 5 :   target of assignment expands to non-language objectnoquote(paste("perf.a", "1", sep="")) = 5Error in noquote(paste("perf.a", "1", sep = "")) = 5 :   target of assignment expands to non-language object
查看完整描述

3 回答

?
楊魅力

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

您可以使用assign(doc)更改perf.a1的值:


> assign(paste("perf.a", "1", sep=""),5)

> perf.a1

[1] 5


查看完整回答
反對(duì) 回復(fù) 2019-11-11
?
明月笑刀無(wú)情

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

請(qǐng)參閱?assign。


> assign(paste("tra.", 1, sep = ""), 5)

> tra.1

  [1] 5


查看完整回答
反對(duì) 回復(fù) 2019-11-11
?
小唯快跑啊

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

在我的情況下,我創(chuàng)建的符號(hào)(Tax1,Tax2等)已經(jīng)具有值,但是我想使用循環(huán)并將符號(hào)分配給另一個(gè)變量。因此,以上兩個(gè)答案給了我實(shí)現(xiàn)此目標(biāo)的方法。這可能有助于回答您的問(wèn)題,因?yàn)榭梢栽谝院箅S時(shí)進(jìn)行值的分配。


output=NULL

for(i in 1:8){

   Tax=eval(as.symbol(paste("Tax",i,sep="")))

   L_Data1=L_Data_all[which(L_Data_all$Taxon==Tax[1] | L_Data_all$Taxon==Tax[2] | L_Data_all$Taxon==Tax[3] | L_Data_all$Taxon==Tax[4] | L_Data_all$Taxon==Tax[5]),]

   L_Data=L_Data1$Length[which(L_Data1$Station==Plant[1] | L_Data1$Station==Plant[2])]

   h=hist(L_Data,breaks=breaks,plot=FALSE)

   output=cbind(output,h$counts)

}


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

添加回答

舉報(bào)

0/150
提交
取消
微信客服

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

幫助反饋 APP下載

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

公眾號(hào)

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