R中的计算效率：条件或新的向量分配？

Question

我有一个执行一些数学运算的函数（简化）：

gam<-function(){
   x<-aa
   ser<-1/x
   gamln<<-x*aa*ser
}

当需要计算gamln时，该函数在其他函数中被调用：

gser<-function(){
    gammap()
    print(gamln)
    #further computing using 'gamln'...
}

我需要为gamln函数中的gser()向量分配空间，但对于此模型，我一直担心计算效率。我认为检查向量存在的条件可能会有所帮助，但我不知道哪种更多的努力＆＃39;：

if (!exists("gamln"){
   gamln<-vector(mode="numeric",length=1)
}

有什么想法？