Suma de vectores en R
Función sum() Bastante fácil!!
En estos programas utilizo scan() que sirve para leer valores, esta es su forma de funcionar, aparece un 1: para que escribas el primer valor, luego 2: mientras sigas dando enter y escribiendo valores se seguirán guardando, pero cuando presiones dos veces enter deja de leerlos. Después la función sum(x) que suma todos los valores que contiene x.
Ejemplo:
>
x <- scan()
1: 5
2: 1
3: 10
4: 8
5: 14
6: 7
7: Read 6 items
> sum(x)
[1] 45
Sumar con for
Aquí hago uso de un for para ir sumando cada elemento de x, la función length(x) sirve para obtener cuantos elementos tiene x.
Ejemplo suma:
> x <- scan()
1: 5
2: 1
3: 10
4: 8
5: 14
6: 7
7: Read 6 items
> for(i in 1:length(x))
{ y <- y + (x[i])}
> y
[1] 45
Más ejemplos con for
Ejemplo factorial:
Factorial de 5
> factorial <- 1
> x <- scan()
1: 5
2: Read 1 item
> for(i in 1:x) { factorial <- factorial*i }
> factorial
[1] 120
> factorial <- 1
> x <- scan()
1: 100
2: Read 1 item
> for(i in 1:x)
{ factorial <- factorial*i }
> factorial
[1] 9.332622e+157
No hay comentarios:
Publicar un comentario