Displaying 2 results from an estimated 2 matches for "nummod".
Did you mean:
nummer
2007 Jul 03
1
loop causes syntax error in print()
...rint statement, the loop runs fine and I can print
out the last iteration of the table.
...[multiple loops and calculations ending with.....]...
+ print(paste(mutType,"sim",sim,"hmm",hmm))
+ # print(acctab[,10:15])
+
+ nummod <- nummod +1
+ } #end hmmMats loop
+ } #end tmats loop
+ } #end mut type loop
[1] "dup sim Imod hmm Jmod"
> print(acctab[,10:15])
hitrate falsepos multrate avghit avgmiss avgfalsepos
1 0.0000000 1 NaN NaN 2...
2009 Feb 02
0
Using Information from the Stats4 package in base envir
...Generate Data from the Models
x1 = runif(n, min, max); #Explanatory variable
eA = rnorm(n, 0, sigmaA); eB = rnorm(n, 0, sigmaB);
respA = a0 +a1*x1 + eA; respB = b0 +b1*x1 + eB; #Responses
#K-Means Clustering
resp1 = c(respA, respB);#Put response into single vector for k-means
x12 = rep(x1,nummod); #Put explanatory into a single vector
data1 = data.frame(resp1, x12) #Data frame for kmeans
cluster1 = kmeans(data1, 2, nstart=25)$cluster #Obtain cluster labels
data1 = data.frame(data1 ,cluster1)#Cluster labels in third column
data10 = subset(data1, cluster1==1)
data11 = subset(dat...