practica 4 operadores comparacion y logicos

Practica 4 operadores comparacion y logicos

Objetivo: Realizar expresiones de comparación y lógicos, conocer su sintaxis y los resultados

Descripción: Mediante uso de operadores de comparación y logicos, realizar expresiones y conocer su sintaxis

## Asignacion de cinco variables tipo numéricas: 3 tipo enteras, dos tipo double, y tres variables de tipo carácter con cadena de caracteres

var1<-60
var2<-70
var3<-10
var4<-10.678
var5<-45.089
var6<- 'Gabriela'
var7<- 'Jorge'
var8<-'Cecilia'

##Realizar una expresión de comparar < entre dos valores tipo numéricos, asignar y presentar vres.
if (var1<var2){
  vres<- 'es menor'
  print(vres)
} else {
  vres<-'es mayor'
  print(vres)
}

## [1] "es menor"

##Realizar una expresión de comparar > entre dos valores tipo numéricos, asignar y presentar vres.
if (var2>var3){
  vres<- 'es mayor'
  print(vres)
} else {
  vres<-'es menor'
  print(vres)
}

## [1] "es mayor"

##Realizar una expresión de comparar <= entre dos valores tipo double, asignar y presentar vres.
if (var4<=var5){
  vres<- 'es menor o igual'
  print(vres)
} else {
  vres<-'es mayor'
  print(vres)
}

## [1] "es menor o igual"

##Realizar una expresión de comparar >= entre dos valores tipo double, asignar y presentar vres.
if (var5>=var4){
  vres<- 'es mayor o igual'
  print(vres)
} else {
  vres<-'es menor'
  print(vres)
}

## [1] "es mayor o igual"

## Evaluar cualquier expresión mediante eval()

vres<- eval(expression(var4>var3))
print(vres)

## [1] TRUE

## Comparar dos variables tipo char si son iguales o diferentes y presentar el resultado
if (var6 == var7){
  vres<-'es igual'
  print(vres)
} else {
  vres<- 'son diferentes'
  print(vres)
}

## [1] "son diferentes"

## Determinar si un valor entero es entero is.integer y presentar en pantalla
vres<-is.integer(var1)
print(vres)

## [1] FALSE

## Determinar si un valor es double y presentar en pantalla
vres<- is.double(var5)
print(vres)

## [1] TRUE

## Determinar si un valor es character y presentar en pantalla
vres<- is.character(var6)
vres

## [1] TRUE

##Determinar si su valor es lógico
is.logical(vres)

## [1] TRUE