Práctica 4- Manejo de operadores de comparación

Práctica 4-Manejo de operadores de comparación

Objetivo:Realizar expresiones de comparación haciendo uso de los operadores de comparación y su precedencia

Variables

a<-3
b<-50
c<-20
d<-9.56
e<-10.45

vnombre<- 'Carolina Hernández'
vestudios<-'Ingenieria en Sistemas'
vsaludo<-'Hola que tal'

a

## [1] 3

b

## [1] 50

c

## [1] 20

d

## [1] 9.56

e

## [1] 10.45

vnombre

## [1] "Carolina Hernández"

vestudios

## [1] "Ingenieria en Sistemas"

vsaludo

## [1] "Hola que tal"

Comparación <

"Comparar, ¿a<b?"

## [1] "Comparar, ¿a<b?"

a

## [1] 3

b

## [1] 50

if (a<b){
    vres<-'Si,a es menor'
    vres
}else {
    vres<-'falso'
    vres
  }

## [1] "Si,a es menor"

Comparación >

"Comparar, ¿b>c?"

## [1] "Comparar, ¿b>c?"

b

## [1] 50

c

## [1] 20

if (b>c){
    vres<-'Si,b es mayor'
    vres
}else {
    vres<-'falso'
    vres
  }

## [1] "Si,b es mayor"

Comparación <=

"Comparar, ¿d<=e?"

## [1] "Comparar, ¿d<=e?"

d

## [1] 9.56

e

## [1] 10.45

if (d<=e){
    vres<-'Si,d es menor o igual que e'
    vres
}else {
    vres<-'falso'
    vres
  }

## [1] "Si,d es menor o igual que e"

Comparación >=

"Comparar, ¿d>=e?"

## [1] "Comparar, ¿d>=e?"

d

## [1] 9.56

e

## [1] 10.45

if (d>=e){
    vres<-'Si,d es mayor o igual que e'
    vres
}else {
    vres<-'falso'
    vres
  }

## [1] "falso"

Evaluar

eval(vnombre)# no entiendo está función =/

## [1] "Carolina Hernández"

Comparar dos variables tipo caracter

vnombre

## [1] "Carolina Hernández"

vestudios

## [1] "Ingenieria en Sistemas"

if (vnombre==vestudios){
  vres<-'Ambas expresiones son iguales'
  vres
}else {
  vres<-'Éstas expresiones son diferentes entre sí'
  vres
  
}

## [1] "Éstas expresiones son diferentes entre sí"

¿Es un entero?

a

## [1] 3

vres<-is.integer(a)
vres #el resultado me sale falso,¿por qué?

## [1] FALSE

¿Es double?

e

## [1] 10.45

vres<-is.double(e)
vres

## [1] TRUE

¿Es character?

vsaludo

## [1] "Hola que tal"

vres<-is.character(vsaludo)
vres

## [1] TRUE

¿Es lógico?

vestudios

## [1] "Ingenieria en Sistemas"

vres<- is.logical(vestudios)
vres

## [1] FALSE