Estructuras de control
if, else if, else
Determinar si un número es positivo, negativo o cero
x<-5
if (x>0){
print("X es positivo")
} else if (x==0){
print("X es cero")
} else{
print("X es negativo")
}
## [1] "X es positivo"
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[3]
## [1] "c"
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"
For para iterar o recorrer los indices del vector
el elemento en la posición 1 es a
vec[3]
## [1] "c"
vec<-c("a","b","c")
length(vec)
## [1] 3
for (i in 1:length(vec)){
print(paste("EL elemento en a posicion",i,"es",vec[i]))
}
## [1] "EL elemento en a posicion 1 es a"
## [1] "EL elemento en a posicion 2 es b"
## [1] "EL elemento en a 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(3)
## [1] "X es positivo"
Función para sumar dos números
suma<- function(x,y){
return (x+y)
}
suma(3,5)
## [1] 8
Tipo de variable
logi<-TRUE
numer <- 2.4
nombre <- "Jairo"
int <- as.integer(2)
class(logi)
## [1] "logical"