Prueba esto:
x<- c(24,12,45,68,45)
tmp <- outer(x, x, "*")
sum(tmp[lower.tri(tmp)])
Un saludo,
Carlos J. Gil Bellosta
http://www.datanalytics.com
El día 24 de febrero de 2015, 10:02, escribió:
>
>
> Hola, quiero obtener la suma del producto de los elementos de un vector
> y cuando constr
vector que empieza en 0, cuando la posición 1 en R es el 1
>>> por tanto x[0] no existe y no da resultado
>>> sum(x[i]*x[j]) es una operación que calcula la suma de un vector, en tu
>>> caso tienes un escalar y por tanto no debería hacer nada
>>> Tienes que defi
hacer nada
> > Tienes que definir res para que se sume as� misma
> > Un saludo
> > Francisco J.
> >
> >
> > > Date: Tue, 24 Feb 2015 10:02:11 +0100
> > > From: mora...@us.es
> > > To: r-help-es@r-project.org
> > > Subject: [R-es] Proble
+0100
Subject: Re: [R-es] Problema con bucle for
From: c...@qualityexcellence.es
To: fjr...@hotmail.com
CC: mora...@us.es; r-help-es@r-project.org
Hola,
Otra forma de hacerlo, es as�:
#---
> x<- c(24,12,45,68,45)
> sum(apply(combn(x,2),2,prod))
[1] 14121
#
tienes un escalar y por tanto no debería hacer nada
> Tienes que definir res para que se sume así misma
> Un saludo
> Francisco J.
>
>
> > Date: Tue, 24 Feb 2015 10:02:11 +0100
> > From: mora...@us.es
> > To: r-help-es@r-project.org
> > Subject: [R-es] Problema con
a que se sume así misma
>
> Un saludo
>
> Francisco J.
>
>> Date: Tue, 24 Feb 2015 10:02:11 +0100
>> From: mora...@us.es
>> To: r-help-es@r-project.org
>> Subject: [R-es] Problema con bucle for
>>
>>
>>
>> Hola, quiero obtener la
para que se sume as� misma
Un saludo
Francisco J.
> Date: Tue, 24 Feb 2015 10:02:11 +0100
> From: mora...@us.es
> To: r-help-es@r-project.org
> Subject: [R-es] Problema con bucle for
>
>
>
> Hola, quiero obtener la suma del producto de los elementos de un vector
Puedes usar la orden is.na() que comprueba si un valor es NA o no y cuando
lo sea hacer que pase al siguiente paso del bucle. Algo así:
x<- c(24,12,45,68,NA,45)
n<-length(x)
res<-numeric()
for(i in c(1:n)){
print(i)
print(x[i])
if (is.na(x[i])) next
for(j in c(i+1:n)){
if (is.na(x[j])) next
r
Hola, quiero obtener la suma del producto de los elementos de un vector
y cuando construyo el código me aparecen una serie de NA que me impiden
calcular la suma. ¿Alguna sugerencia?
El código es el siguiente:
x<- c(24,12,45,68,45)
n<-length(x)
res<-numeric()
for(i in 1:n-1){
for(j in i+1:n)