GRUPO_1

#FORMAS DE CREAR VECTORES EN R

(vector1<- c(1,2,3,4,5,6))

## [1] 1 2 3 4 5 6

(vec_repetido<- rep(2,3))

## [1] 2 2 2

(vec<- 1:10)

##  [1]  1  2  3  4  5  6  7  8  9 10

(vec_secuencia<- seq(1,9,2))

## [1] 1 3 5 7 9

#OPERACIONES CON VECTORES
#Suma

(A<- c(1:10))

##  [1]  1  2  3  4  5  6  7  8  9 10

(B<- c(2,4,1,3,1,4,6,7,5,2))

##  [1] 2 4 1 3 1 4 6 7 5 2

(suma<-A+B)

##  [1]  3  6  4  7  6 10 13 15 14 12

#Resta

(C<- rep(3,10))

##  [1] 3 3 3 3 3 3 3 3 3 3

(D<- seq(1,20,2))

##  [1]  1  3  5  7  9 11 13 15 17 19

(resta<- C-D)

##  [1]   2   0  -2  -4  -6  -8 -10 -12 -14 -16

#Multiplicación

(E<- c(3:10))

## [1]  3  4  5  6  7  8  9 10

(G<-c(2,6,4,6,7,22,4,6))

## [1]  2  6  4  6  7 22  4  6

(multiplicacion<- E*G)

## [1]   6  24  20  36  49 176  36  60

#Gráfica

(v = c(1,3))

## [1] 1 3

plot(3,1, xlim=c(0,5), ylim=c(0,5), xlab="x", ylab="y", lwd=3, ,col='red',
     bty='n')
arrows(0,0,3,1,col='blue', lwd = 2)

#Mas ejemplos de operaciones con vectores

(v = c(1,3))

## [1] 1 3

2*v

## [1] 2 6

2*v + 1 

## [1] 3 7

w = c(3,1)
v + w

## [1] 4 4

#Operaciones con vectores y su graficas
Por ejemplo, el primer vector es v = (x = 3, y = 1) y el segundo vector es w = (x = 1, y = 3)::

plot(3,1, xlim=c(0,5), ylim=c(0,5), xlab="x", ylab="y", lwd=3, ,col='red', 
     bty='n')
arrows(0,0,3,1,col='red',lwd = 2)
points(1,3,lwd=3,col='blue')
arrows(0,0,1,3,col='blue',lwd = 2)
points(4,4,lwd=3,col='green')
arrows(0,0,4,4,col='green',lwd = 2)
arrows(1,3,4,4,col='red',lty=3,lwd = 2)
arrows(3,1,4,4,col='blue',lty=3,lwd = 2)