Displaying 3 results from an estimated 3 matches for "width2".
Did you mean:
width
2010 Mar 27
1
string width calculation
...work correctly):
> STRING1 <- "0123456789 0"
> STRING2 <- " x "
> pdf("GREEK.pdf", width=10, height=8)
> par(mfrow=c(1,1))
> WIDTH1 <- strwidth("0123456789", cex=1, units="inches", family="", font=1)
> WIDTH2 <- strwidth("0", cex=1, units="inches", family="", font=1)
> plot(1,1,type="n", axes=F, xlab="", ylab="")
> mtext(line=-1, outer=T, cex=1, family="", font=1, adj=0.5, STRING1)
> mtext(line=-1, outer=T, cex=1...
2000 Apr 05
2
My first R-program
...pValCalculator(b, n=20, m=20)
{
ind <- 1:min(c(n,m))
prob <- (1-pnorm(b,sd=std*sqrt(ind)))
prob1 <- sum((n-ind+1)*(m-ind+1)*prob)
prob1
}
inputData <-
scan("/users/lvssso/projects/LAMA/output/pValLamaScore.tmp", list(block1
= "",block2 = "",width1 = 0,width2 = 0,alignment = 0,score = 0));
pVal <- vector(mode = "numeric", length(inputData$score));
for(i in 1:length(inputData$score))
pVal[i] <- pValCalculator(inputData$score, inputData$width1,
inputData$width2);
inputData$pValue <- list(pVal);
write.table(inputData, file = "...
2000 Apr 05
0
My first R program
...pValCalculator(b, n=20, m=20)
{
ind <- 1:min(c(n,m))
prob <- (1-pnorm(b,sd=std*sqrt(ind)))
prob1 <- sum((n-ind+1)*(m-ind+1)*prob)
prob1
}
inputData <-
scan("/users/lvssso/projects/LAMA/output/pValLamaScore.tmp", list(block1
= "",block2 = "",width1 = 0,width2 = 0,alignment = 0,score = 0));
pVal <- vector(mode = "numeric", length(lamaScore));
for(i in 1:length(inputData$lamaScore)
***** pVal[i] <- pValCalculator(inputData$score, inputData$width1,
inputData$width2);
inputData$pValue <- list(pVal);
write.table(inputData, file = &quo...