R help es - Feb 2010 - bucle para que repita elementos

Hola a todos.

Estoy intentando implimentar un bucle que repita tantas veces un 
elemento como indique otro vector y me cree una tabla con ellos , por 
ejemplo:

h<-c(1,2,3,1,2,3,1,1)
g<-c(6,7,4,1,3,3,2,1)

for(i in 1:sum(h)){
X <- rep(g[i], h[i])
as.vector(X)->X
write.table(X,
file="X.txt",append=TRUE,row.names=FALSE,col.names=FALSE,
quote = FALSE)
}

Y no para de salirme:

Error en rep(g[i], h[i]) : argumento 'times' inválido

Me podriais ayudar, ya que no se que error cometo

rep(h, g) generará el vector que quieres sin necesidad de bucle.

El error se produce porque donde pones sum(h) deberías poner length(h)

El 12 de febrero de 2010 13:42, José Miguel Contreras
<jmcontreras@ugr.es>escribió:
> Hola a todos.
>
> Estoy intentando implimentar un bucle que repita tantas veces un elemento
> como indique otro vector y me cree una tabla con ellos , por ejemplo:
>
> h<-c(1,2,3,1,2,3,1,1)
> g<-c(6,7,4,1,3,3,2,1)
>
> for(i in 1:sum(h)){
> X <- rep(g[i], h[i])
> as.vector(X)->X
> write.table(X,
file="X.txt",append=TRUE,row.names=FALSE,col.names=FALSE,
> quote = FALSE)
> }
>
> Y no para de salirme:
>
> Error en rep(g[i], h[i]) : argumento ''times'' inválido
>
> Me podriais ayudar, ya que no se que error cometo
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
	[[alternative HTML version deleted]]