29.FEB.16

Datos especiales: NA 's.

#En algunos casos las componentes de un objeto pueden no ser completamente conocidas.
#Cuando un elemento o valor es not available le asignamos el valor especial NA .
#En general una operación con elementos NA resulta NA ,
x<- NA
x+1


#a no ser que Mediante una opción de la función, podamos omitir o tratar los datos
#faltantes de forma especial. na.rm=FALSE (que3resultado NA cuando3
#La opción por defecto en cualquier función es3indica que NO elimina los NA ),
#que da como existe al menos un dato faltante. Con la opción na.rm=TRUE ,
#la operación se efectúa con los datos válidos.

y<-c(x,3,5,x)
#Asignamos al vector
#y dos NA y dos números.

#mean(y)
#Calcula la media teniendo en cuenta los NA 's.

mean(y,na.rm=TRUE)
#Calcula la media SIN tener en cuenta los NA 's.

sqrt(-17)
#Produce un Warning message avisando que es un NaN .
sqrt(-17+0i)
#Calcula el resultado y devuelve un número complejo.
x<-5/0
#Asignamos a x un valor innito.
exp(-x)
#Devuelve el valor 0.
exp(x)-exp(x)
#Devuelve NaN : es una indeterminación.

v <- numeric() #almacena en v una estructura vacía de vector numérico.
#character() es un vector de caracteres vacío, y lo mismo ocurre con otrostipos.

v[3] <- 17 #transforma componentes serán3NA ). en un vector de longitud 3, (cuyas dos primeras

asignaciones
x <- 3 #es equivalente a
3 -> x
#pero no a
x < - 3

x1<-logical(4) #Inicializa un vector de longitud 4 cuyos elementos son FALSE

x4<-character(4) #Inicializa un vector de caracteres de longitud 4

#Las comparaciones que dan un resultado lógico son:
#<, <=, >, >=, ==, ! = .



x<-c(1:10)
is.numeric(x) #resulta en TRUE
is.vector(x) # resulta en TRUE
is.complex(x) # resulta en FALSE

is.character(x)#resulta en   FALSE



x<-as.character(x)
x a tomar
"6" "7" "8" "9" "10")


nombre<-c("Luis", "María") # Vector de caracteres
edad<-c(23, 24)
varon<-c(TRUE, FALSE); adult <- edad>18
estatura<-c(1.77, 1.64)
estatura[2] #Devuelve 1.64


#R tiene grandes facilidades para generar vectores de secuencias de números.
#El operador más usual es : desde:hasta desde ) de uno. que genera una secuencia 
#incrementos (o decremento si hasta es menor que en Este operador tiene la prioridad más alta en una #expresión. La función seq() permite generar sucesiones más complejas. Dispone
#de varios argumentos ( from, to, by, length ).
#Existen funciones similares que realizan los cálculos más rápidamente (muy útiles a la
#hora de programar). 
#Una función relacionada es
#rep() ,
#?seq .
#que permite duplicar un objeto de
#formas diversas. Su forma más sencilla es
#rep(x, times=5) que x , una tras otra.

pi:1
seq(0,1,length=10)
seq(3) # equivale a 1:3 y a seq(1,3)
seq(1,5,by=0.5)
-1:1/0
rep(1:4,2)
rep(1:4,c(2,3,1,2))
rep(1:4,c(2,2)) # error, tamaños no coinciden
sequence(c(2,3))

##########MUESTRAS###
x<-c(1:10)
sample(x,3)
sample(x) # Permutaciones de los elementos de x
y<-sample(5:15,5)
y

##############33 VECTOR DE NOMBRES

frutos<-c(5,10,1,20)
names(frutos)<-c("pera","banana","melon","naranja")
postre<-frutos[c("pera","melon")]