Exercicis d’aplicació de codi d’R: PRACTICA II:
1.- Crear les funcions en R que permetin determinar les següents sèries per als n=1 fins
a 100 valors primers, i entregueu una aplicació d’aquestes
un un 1 un 2 | u1 1, u2 3
1.1.-
La equació per fer aquest càlcul
seria aquesta, on n= nombres
naturals
x ( n )=x ( n−1 )−x (n−2)
1.2.- a, a d , a 2d , a 3d ,..., a nd | a 1, d 2
, La funció seria:
x ( R ) =a+ ( R−1 ) · d
R= nombres reals
a i d= valors donats per l’exercici.
1.3.- La suma dels primers n nombres naturals.
La funció seria:
x ( R ) =a+[ ( R−1 ) · b]
On R= nombres reals i a i b la unitat (1)
1.4.- La suma de sèries aritmètiques.
, R+a
y ( R )=R·
2
On R= nombres reals
CODI EXERICI 1:
1.1.
x<-1:100
x[1]<-1
x[2]<-3
for(i in 3:100)
{
x[i]<-x[i-1]-x[i-2]
}
x
[1] 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1
[26] 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3
[51] 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2
[76] -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1
plot(x)
lines(x)
1.2.
a <- 1
d <- 2
x<-1:100
x[1]<-a
x[2]<-a+d
for(i in 1:100)
{
x[i]<-a+(i*d)
}
1.- Crear les funcions en R que permetin determinar les següents sèries per als n=1 fins
a 100 valors primers, i entregueu una aplicació d’aquestes
un un 1 un 2 | u1 1, u2 3
1.1.-
La equació per fer aquest càlcul
seria aquesta, on n= nombres
naturals
x ( n )=x ( n−1 )−x (n−2)
1.2.- a, a d , a 2d , a 3d ,..., a nd | a 1, d 2
, La funció seria:
x ( R ) =a+ ( R−1 ) · d
R= nombres reals
a i d= valors donats per l’exercici.
1.3.- La suma dels primers n nombres naturals.
La funció seria:
x ( R ) =a+[ ( R−1 ) · b]
On R= nombres reals i a i b la unitat (1)
1.4.- La suma de sèries aritmètiques.
, R+a
y ( R )=R·
2
On R= nombres reals
CODI EXERICI 1:
1.1.
x<-1:100
x[1]<-1
x[2]<-3
for(i in 3:100)
{
x[i]<-x[i-1]-x[i-2]
}
x
[1] 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1
[26] 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3
[51] 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2
[76] -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1 -3 -2 1 3 2 -1
plot(x)
lines(x)
1.2.
a <- 1
d <- 2
x<-1:100
x[1]<-a
x[2]<-a+d
for(i in 1:100)
{
x[i]<-a+(i*d)
}