Displaying 1 result from an estimated 1 matches for "significance_star".
Did you mean:
significance_stars
2011 Dec 31
2
Very strange function() behaviour.
...me a
massive 1 dimensional vector.
What the heck?? The function code is below.
#----------------------------------------------------------------------------------------------
fun.starpaste <-
function(t,co=NULL,tails=2,sig=c(0.9,0.95,0.99)) #handles the pasting of
#coef(tstat)significance_stars
{
if(length(dim(t))>1)t3<-t else fake1<-1
t<-matrix(t)
if(is.null(co)==TRUE)fake<-1 else co<-matrix(co)
if(exists(as.character(substitute(fake1)))==FALSE)fake<-1 else t3<-t
tstat<-as.numeric(t);tstat[is.na(tstat)]<-0
sig.l<-length(sig)...