Hola,

Es un problema de "cat()".
Mira esta alternativa:

foo<- function(x){
  x2<- x^2
  for(i in 1:length(x)){
    #print(cat("El cuadrado de",x[i],"es ", x2[i],"n"))
    print(paste("El cuadrado de ",x[i]," es ", x2[i]," n ", sep=""))
  }
}

x <- c(2,4,6)

foo(x)


> foo(x)
[1] "El cuadrado de 2 es 4 n "
[1] "El cuadrado de 4 es 16 n "
[1] "El cuadrado de 6 es 36 n "


El 5 de octubre de 2013 08:16, <morales@us.es> escribió:

>
>
> Hola, tengo una función que cuando mando imprimir el resultado me
> salen los resultados unidos a un NULL que quiero quitar y no se como
> hacerlo.
>
> Os pongo un ejemplo:
>
> foo<- function(x){
> x2<- x^2
> for(i in
> 1:length(x)){
> print(cat("El cuadrado de",x[i],"es ", x2[i],"n"))
> }
> }
>
> x
> <- c(2,4,6)
>
> foo(x)
>
> El resultado es el siguiente:
>
> El cuadrado de 2
> es 4
> NULL
> El cuadrado de 4 es 16
> NULL
> El cuadrado de 6 es 36
> NULL
>
>
> Saludos
>
>
>         [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>


-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

	[[alternative HTML version deleted]]

