【R】均值假设检验
p_value<-function(cdf,x,parament=numeric(0),side=0){n<-length(parament)p<-switch(n+1,cdf(x),cdf(x,parament),cdf(x,parament[1],parament[2]),cd...
p_value<-function(cdf,x,parament=numeric(0),side=0){n<-length(parament)p<-switch(n+1,cdf(x),cdf(x,parament),cdf(x,parament[1],parament[2]),cd...