Operaciones

Operaciones aritmèticas

#suma
Suma1 =10+5

#print(suma1)
Suma2 <-13+8

#Suma2
Suma1+Suma2
## [1] 36
#Resta
13-3
## [1] 10
#Multiplicaciòn
Mult <-8*5

#Divisiòn
Div <-15/5

#Potenciaciòn
2^3
## [1] 8
#Mòdulo
7%%2
## [1] 1

Operaciones Lògicas

Las variables lògicas solo tienen dos estados.

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
5>=3
## [1] TRUE
5<3
## [1] FALSE
5<=3
## [1] FALSE

Estructuras de Control

if, else if, else

x<- -8
#Determinar si un número es positivo, negativo o cero
if (x>0){
  print("X es positivo")
} else if (x==0){
  print('X es cero')
} else{
  print("X es negativo")
}
## [1] "X es negativo"

Estructura for

for (i in 0:5){
  print(i)
}
## [1] 0
## [1] 1
## [1] 2
## [1] 3
## [1] 4
## [1] 5
vec <- c("a","b","c")
length(vec)
## [1] 3
for(val in vec){
  print(paste("El elemento del vector es",val))
}
## [1] "El elemento del vector es a"
## [1] "El elemento del vector es b"
## [1] "El elemento del vector es c"
vec[3]#Acceder al elemento que está en la posición 3
## [1] "c"
# 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 <- 1

while(i<=5){
  print(i)
  i<-i+1
}
## [1] 1
## [1] 2
## [1] 3
## [1] 4
## [1] 5

Estructura de control switch

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 es positivo")
  } else if (x==0){
    print('X es cero')
  } else{
    print("X es negativo")
  }
}


evaluar_numero(-9)
## [1] "X es negativo"
# función para sumar dos números

suma<- function(x,y){
  return (x+y)
}
suma(3,15)
## [1] 18