Operaciones

##Operaciones aritméticas

Suma

#Suma
23+65
## [1] 88
suma1<-20+3
print(suma1)
## [1] 23
suma2<-34+1
suma1+suma1
## [1] 46
#Resta
13-3
## [1] 10
#Multiplicación
Mult<-8*5

#División
Div<-15/5

#Potenciación
2^3
## [1] 8
#Módulo
8%%2
## [1] 0

Operaciones Lógicas

logi<-TRUE

#Operador AND
TRUE & TRUE
## [1] TRUE
TRUE & FALSE
## [1] FALSE
FALSE & FALSE
## [1] FALSE
#Operador OR
TRUE | TRUE
## [1] TRUE
TRUE | FALSE
## [1] TRUE
FALSE | FALSE
## [1] FALSE
#Operador NOT
!logi
## [1] FALSE

Operaciones de comparación

#igual
5==3
## [1] FALSE
#no igual
5!=3
## [1] TRUE
#mayor
5>3
## [1] TRUE
#mayor o igual
5>=3
## [1] TRUE
#menor
5<3
## [1] FALSE
#menor o igual
5<=3
## [1] FALSE

Estructuras de control

if, else if, else

x<-0

}

Estructura for

for (i in 1:5){
  print(i)
}
## [1] 1
## [1] 2
## [1] 3
## [1] 4
## [1] 5
vec<-c("a","b","c")
length(vec)
## [1] 3
for(val in vec){ 
  print(val)

}
## [1] "a"
## [1] "b"
## [1] "c"
vec[1]#Acceder al elemento que está en la posición
## [1] "a"
## For para iterar o recorrer los indices del vector
### el elemento en la posición 1 es a

for(i in 1:length(vec)){
  print(paste("el elemento en la posicion",i,"es",vec[i]))
}
## [1] "el elemento en la posicion 1 es a"
## [1] "el elemento en la posicion 2 es b"
## [1] "el elemento en la posicion 3 es c"

Estructura de control while

i<- 6

while(i<=5){
  print(i)
  i<=i+1
  
}

Estructura de control switch

value <- 3

value <- 3

result <- switch(value,"1"="One","2"="Two","3"="Three", "Invalid")
print(result)
## [1] "Three"

##Definir una función

evaluar_numero <- function(x){
  if (x>0){
  print("x is positive")
}else if (x==0){
print("x is zero")
} else {print("x is negative")
}
}

evaluar_numero(3)
## [1] "x is positive"
# función para sumar dos números

suma <- function(x,y){
  return (x+y)
}

suma(3,5)
## [1] 8