doMC in R and foreach loop not working
===

I am trying to get the "foreach" package for parallel processing in R working and I am having a couple of issues:

The doMC package that is required to make foreach work does not exist on CRAN for windows. Some blogs suggest that doSNOW instead should do the same job. However, when I run the foreach command with doSNOW, %dopar% does not seem to work faster than %do%. In fact it is much slower. My OS is an  intel r core tm i 7 cpu 860 @ 2.80GHz with 8 GB of RAM. Below is my code:

##Run example in 1 core 

> require(foreach)
> require(doSNOW)


> x= iris[which(iris[,5] != "setosa"),c(1,5)]
> 
> trials = 10000
> system.time({
+ r= foreach(icount(trials), .combine=cbind) %do% {
+ ind=sample(100,100,replace=TRUE)
+ results1 = glm(x[ind,2]~x[ind,1],family=binomial(logit))
+ coefficients(results1)
+ }
+ })[3]
  elapsed 
  37.28 


#Same example in 2 cores

> registerDoSNOW(makeCluster(2,type="SOCK"))
> getDoParWorkers()
> trials = 10000
> system.time({
+ r= foreach(icount(trials), .combine=cbind) %dopar% {
+ ind=sample(100,100,replace=TRUE)
+ results1 = glm(x[ind,2]~x[ind,1],family=binomial(logit))
+ coefficients(results1)
+ }
+ })[3]


elapsed 
 108.14 


Any help is appreciated.