INTEGRANTES

1.Katherine Arenas 2.Karol Ferreira 3.Tatiana Parra

titulo

  1. Calcule usando R
((1+sqrt(5))/2)
## [1] 1.618034
(1+3.3*log10(50))
## [1] 6.606601
 1-exp(-1)
## [1] 0.6321206
2+3^(1/5)
## [1] 3.245731
 choose(5,2)
## [1] 10
(1/(1+(1/(1+(1/2)))))
## [1] 0.6
(1+sqrt(1+2))^(1/3)
## [1] 1.397965
 1+log(1/2)
## [1] 0.3068528
log(8,base = 2)
## [1] 3
sin(pi) 
## [1] 1.224606e-16
factorial(10)
## [1] 3628800
((1+sqrt(5))/2)^(-1)
## [1] 0.618034
(2)^((3)^4)
## [1] 2.417852e+24
(2^3)^(4)
## [1] 4096

ñ)

(2/3)/4
## [1] 0.1666667
2/(3/4)
## [1] 2.666667
7%%2
## [1] 1
7%/%2
## [1] 3
  1. Sean
a <- 1
b <- 2
3 -> d
f <<- 1L
a
## [1] 1
print(a)
## [1] 1
(a)
## [1] 1
e <- a+b #no resuelve nada#
(e <- a+b)
## [1] 3
d
## [1] 3
f
## [1] 1
exists("d")
## [1] TRUE
exists("zz")
## [1] FALSE

4.. Dado un vector numerico x explique que hace cada una de las siguientes funciones de R, ilustre con ejemplos.

x<- c(1,2,3,4,5,6,7,8,9)
sort(x)
## [1] 1 2 3 4 5 6 7 8 9
rev(x)
## [1] 9 8 7 6 5 4 3 2 1
sum(x)
## [1] 45
prod(x)
## [1] 362880
length(x)
## [1] 9
min(x)
## [1] 1
max(x)
## [1] 9
unique(x)
## [1] 1 2 3 4 5 6 7 8 9
duplicated(x)
## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
rank(x)
## [1] 1 2 3 4 5 6 7 8 9
cumsum(x)
## [1]  1  3  6 10 15 21 28 36 45
mean(x)
## [1] 5
sd(x)
## [1] 2.738613
var(x)
## [1] 7.5

ñ)

summary(x)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##       1       3       5       5       7       9
any(x<0)
## [1] FALSE
table(x)
## x
## 1 2 3 4 5 6 7 8 9 
## 1 1 1 1 1 1 1 1 1
sample(x,2,replace = TRUE)
## [1] 6 2
  1. Usando las funciones “:”, rep() y seq() cree las siguientes sucesiones. Haga help(“:”), help(rep) y/o help(seq) para solicitar ayuda.

a)1, 2, 3, 4, 5, 6, 7

1:7
## [1] 1 2 3 4 5 6 7

b)“d”, “d”, “d”, “d”, “d”, “d”

rep("d", 5)
## [1] "d" "d" "d" "d" "d"

c)1, 2, 3, 4, 5, 1, 2, 3, 4, 5

rep(1:5, 2)
##  [1] 1 2 3 4 5 1 2 3 4 5

d)1, 1, 2, 2, 3, 3, 4, 4, 5, 5

rep(1:5, each= 2)
##  [1] 1 1 2 2 3 3 4 4 5 5

e)1, 1, 1, 2, 2, 2, 3, 3, 3

rep(1:3, each=3)
## [1] 1 1 1 2 2 2 3 3 3
  1. 1, 1, 2, 3, 3, 4, 5, 5
rep(1:5, c(2,1,2,1,2))
## [1] 1 1 2 3 3 4 5 5

g)1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 1, 1

rep(1:5, each=2, len=12)
##  [1] 1 1 2 2 3 3 4 4 5 5 1 1

h)1, 1, 2, 2, 3, 3, 1, 1, 2, 2, 3, 3

rep(1:3, each=2, len=12)
##  [1] 1 1 2 2 3 3 1 1 2 2 3 3

i)2, 6, 10, 14, 18, 22

seq(2,22, by=4)
## [1]  2  6 10 14 18 22
  1. 2.1, 3.1, 4.1, 5.1
seq(2.1, 5.1)
## [1] 2.1 3.1 4.1 5.1
  1. El vector cola representa la cola en una taquilla:

a)llega Maria

cola <- c("Carlos", "Paola", "Pedro", "Valeria")
cola[5]<- "Maria"
cola
## [1] "Carlos"  "Paola"   "Pedro"   "Valeria" "Maria"

b)se va Carlos

cola[-1]
## [1] "Paola"   "Pedro"   "Valeria" "Maria"
cola<- cola[-1]

c)Pedro se aburre y se va

cola[-2]
## [1] "Paola"   "Valeria" "Maria"
cola<- cola[-2]
  1. ¿Que hacen los siguientes comandos en R?

a) ls() ls y objetos devuelven un vector de cadenas de caracteres que dan los nombres de los objetos en el entorno especificado. Cuando se invoca sin argumentos en el indicador de nivel superior, ls muestra qué conjuntos de datos y funciones ha definido un usuario. Cuando se invoca sin argumentos dentro de una función, ls devuelve los nombres de las variables locales de la función: esto es útil junto con el navegador.

b) rm() remove y rm se puede utilizar para eliminar objetos. Estos pueden especificarse sucesivamente como cadenas de caracteres, o en la lista de vectores de caracteres, o mediante una combinación de ambos. Todos los objetos así especificados serán eliminados.

Si envir es NULL, primero se busca en el entorno activo actual.

Si hereda es VERDADERO, se buscarán los padres del directorio proporcionado hasta que se encuentre una variable con el nombre dado. Se imprime una advertencia para cada variable que no se encuentra

c) Sys.Date() Sys.time y Sys.Date devuelve la idea del sistema de la fecha actual con y sin hora.

d) Sys.time() Sys.time y Sys.Date devuelve la idea del sistema de la fecha actual con y sin hora

e) sessionInfo() Imprima la información de la versión sobre R, el sistema operativo y los paquetes adjuntos o cargados.

f) con en el teclado ctrl + l Esta función sirve para limpiar la consola

  1. Dado el vectorx <- c(1,1,1,2,2,2,2,3,3), explique que hacen las funcionesrle(x),NROW()yNCOL()
  1. rle(x): esta función muestra cuantas veces se repite cada valor dentro del vector
x<- c(1,1,1,2,2,2,2,3,3)
rle(x)
## Run Length Encoding
##   lengths: int [1:3] 3 4 2
##   values : num [1:3] 1 2 3
  1. nrow(x):nrow y ncol devuelven el número de filas o columnas presentes en x. NCOL y NROW hacen lo mismo al tratar un vector como matriz de 1 columna, incluso un vector de longitud 0, compatible con as.matrix () o cbind (), vea el ejemplo.
NROW(x)
## [1] 9
  1. NCOL(X): nrow y ncol devuelven el número de filas o columnas presentes en x. NCOL y NROW hacen lo mismo al tratar un vector como matriz de 1 columna, incluso un vector de longitud 0, compatible con as.matrix () o cbind (), vea el ejemplo.
NCOL(x)
## [1] 1
  1. Dados los vectoresx1yx2explique como R obtienex1 + x2

suma cada factor que se encuentra en los vectores en el mismo orden en el que estan organizados, dado que un vector es mas corto que el otro, el programa rellena los espacios repitiendo los datos del vector, es decir: c(1,2,3,4,5) + c(6,7,8,6,7) ______________ 7,9,11,10,12

x1<- c(1,2,3,4,5)
x2<- c(6,7,8)
x1+x2
## Warning in x1 + x2: longitud de objeto mayor no es múltiplo de la longitud
## de uno menor
## [1]  7  9 11 10 12
suppressWarnings(x1+x2)
## [1]  7  9 11 10 12
  1. Para el vector c(3:8,1:6,7) explique que hacen las funciones which.min y which.max

Determina la ubicación, es decir, el índice del (primer) mínimo o máximo de un vector numérico (o lógico).

vec<- c(3:8,1:6,7)
which.min(vec)
## [1] 7
which.max(vec)
## [1] 6
  1. La funci´on outer(x,y,FUN) opera la funcion FUN a cada par de elementos de los vectores x y y. Por ejemplo para generar una tabla de multiplicacion:
a<- 1:9
names(a) <- a
outer(a,a,"*")
##   1  2  3  4  5  6  7  8  9
## 1 1  2  3  4  5  6  7  8  9
## 2 2  4  6  8 10 12 14 16 18
## 3 3  6  9 12 15 18 21 24 27
## 4 4  8 12 16 20 24 28 32 36
## 5 5 10 15 20 25 30 35 40 45
## 6 6 12 18 24 30 36 42 48 54
## 7 7 14 21 28 35 42 49 56 63
## 8 8 16 24 32 40 48 56 64 72
## 9 9 18 27 36 45 54 63 72 81

Realice las tablas de & y | para TRUE y FALSE

v<- c(TRUE,FALSE)
names(v)<- v
outer(v,v,"&")
##        TRUE FALSE
## TRUE   TRUE FALSE
## FALSE FALSE FALSE
outer(v,v,"|")
##       TRUE FALSE
## TRUE  TRUE  TRUE
## FALSE TRUE FALSE
  1. ¿Como calcula R
2/3/4
## [1] 0.1666667
4^3^2
## [1] 262144
2+3*5
## [1] 17
  1. Explique los siguientes resultados:
  1. Es una opcion que incluye 10 numeros hasta el 10 pero no incluye el número 10
1:10-1
##  [1] 0 1 2 3 4 5 6 7 8 9
  1. Es un rango de números que incluye los numeros del 1 al 10 sin incluir el 10
1:(10-1)
## [1] 1 2 3 4 5 6 7 8 9
  1. Prediga el resultado del siguiente c´odigo antes de correrlo en R. Explique el resultado.

El programa lo asume como una operacion sencilla donde la gerarquia matematica soluciona primero la multiplicacion entre el 5 y cada uno de los elementos que se encuentra entre el intervalo de 1 a 6 y luego suma 1.

a = 1; b = 5; c=6

a+b*(1)
## [1] 6
a+b*(2)
## [1] 11
a+b*(3)
## [1] 16
a+b*(4)
## [1] 21
a+b*(5)
## [1] 26
a+b*(6)
## [1] 31
a+b*(1:c)
## [1]  6 11 16 21 26 31
  1. Con el vector letters extraiga:
  1. Los primeros cinco elementos.
letters[1:5]
## [1] "a" "b" "c" "d" "e"
  1. Los cuatro ´ultimos elementos
letters[23:26]
## [1] "w" "x" "y" "z"
  1. El segundo, el octavo y el ultimo.
  1. Para el comando colors()

  1. ¿Es un vector? No es un vector

  2. ¿Que estructura tiene?

   str(colors())
##  chr [1:657] "white" "aliceblue" "antiquewhite" "antiquewhite1" ...
  1. ¿Cu´al es su longitud?
length(colors())
## [1] 657
  1. ¿Que hace el comando head(colours(),10) ?
head(colors(),10)
##  [1] "white"         "aliceblue"     "antiquewhite"  "antiquewhite1"
##  [5] "antiquewhite2" "antiquewhite3" "antiquewhite4" "aquamarine"   
##  [9] "aquamarine1"   "aquamarine2"
  1. ¿Que hace el comando tail(colors(),5)?
tail(colors(),5)
## [1] "yellow1"     "yellow2"     "yellow3"     "yellow4"     "yellowgreen"

  1. ¿En qu´e posici´on est´a el color “purple”?

    547

  1. Para el comando data():

  1. ¿Es una lista?

    Si es una lista

  2. ¿Que estructura tiene?

str(data())
## List of 4
##  $ title  : chr "Data sets"
##  $ header : NULL
##  $ results: chr [1:104, 1:4] "datasets" "datasets" "datasets" "datasets" ...
##   ..- attr(*, "dimnames")=List of 2
##   .. ..$ : NULL
##   .. ..$ : chr [1:4] "Package" "LibPath" "Item" "Title"
##  $ footer : chr "Use 'data(package = .packages(all.available = TRUE))'\nto list the data sets in all *available* packages."
##  - attr(*, "class")= chr "packageIQR"
  1. ¿Cual es su longitud?
length(data())
## [1] 4
  1. Para el vector v2 = c(1,2,NA,3,5,10,NA) que contiene valores perdidos, ¿Que hacen las siguientes funciones:
  1. is.na(v2)?
v2 = c(1,2,NA,3,5,10,NA)
is.na(v2)
## [1] FALSE FALSE  TRUE FALSE FALSE FALSE  TRUE
  1. complete.cases(v2)?
complete.cases(v2)
## [1]  TRUE  TRUE FALSE  TRUE  TRUE  TRUE FALSE

  1. Explique que hace el siguiente codigo.

    el codigo expresado a continuación elimina los datos que faltan en el vector

 v3<- c(2,3,NA,4,5,100,NA,7)
 v3<- v3[!is.na(v3)]
 v3
## [1]   2   3   4   5 100   7
  1. Sea el vector v4 <- 4:11. Explique el siguiente codigo linea por linea.
 v4<- 4:11
 v4> 5
## [1] FALSE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE

el resultado anterior nos indica en ese rango de numeros cuales son mayoes a 5 con la palabra TRUE

 v4[v4>5]
## [1]  6  7  8  9 10 11

El resultado anterior nos muestra los valores que en ese intervalo son mayores a 5

 v4[c(rep(TRUE,3),rep(FALSE,4),TRUE)]
## [1]  4  5  6 11
  1. Explique el codigo siguiente:
v5 <- numeric(0)
length(v5)
## [1] 0

Con este codigo podemos obtener la longitud del vector 5, en el resultado podemos evidenciar que R crea vectores vacÃ?os.

v6 <- vector("integer",7)
v6
## [1] 0 0 0 0 0 0 0

Con el vector 6, estamos generando un entero, con una longitud 7, en donde cada elemento del vector es igual a cero, indicando asÃ? que el programa crea vectores vacÃ?os.

v7 <- vector("numeric",10)
v7
##  [1] 0 0 0 0 0 0 0 0 0 0

En el vector 7, el código “numeric” crea un vector de doble precisión de la longitud especificada con cada uno de los elementos, igual a cero.

v8 <- vector("logical",5)
v8
## [1] FALSE FALSE FALSE FALSE FALSE

El vector 8, se genera un ventor lógico en donde el resultado es FALSE debido a que fue asignado 0L, indicando que el vector se encuentra vac�o.

  1. Explique el siguiente codigo:
options(digits=10)
pi*exp(1)
## [1] 8.539734223
pi
## [1] 3.141592654

Es una constante matemática que fue creada en el programa.

round(pi,5)
## [1] 3.14159

El código “round” redondea los valores, en este caso se redondea el valor de la constante Pi, creada en el programa.

ceiling(pi)
## [1] 4

Con el código “ceiling” toma un solo argumento numérico de pi y devuelve un vector numérico que contiene los enteros más pequeños.

floor(pi)
## [1] 3

Este codigo “floor” toma un solo argumento de pi, devolviendo un vector numérico que contiene los enteros más grandes.

round(seq(1,2,0.1))
##  [1] 1 1 1 1 1 2 2 2 2 2 2

Con este codigo, se genera el redondeo de la raiz cuadrada de los datos seleccionados.

  1. Dado el vector vect:
vect <- 1:150

Extraiga los: (a) los pares

which((vect)%%2 == 0)
##  [1]   2   4   6   8  10  12  14  16  18  20  22  24  26  28  30  32  34
## [18]  36  38  40  42  44  46  48  50  52  54  56  58  60  62  64  66  68
## [35]  70  72  74  76  78  80  82  84  86  88  90  92  94  96  98 100 102
## [52] 104 106 108 110 112 114 116 118 120 122 124 126 128 130 132 134 136
## [69] 138 140 142 144 146 148 150
  1. los divisibles por 17
which((vect)%%17== 0)
## [1]  17  34  51  68  85 102 119 136
  1. los no divisibles por 5
which((vect)%%5== 0)
##  [1]   5  10  15  20  25  30  35  40  45  50  55  60  65  70  75  80  85
## [18]  90  95 100 105 110 115 120 125 130 135 140 145 150
  1. los que tienen residuo 3 bajo división por 7
which((vect)%%7== 3)
##  [1]   3  10  17  24  31  38  45  52  59  66  73  80  87  94 101 108 115
## [18] 122 129 136 143 150
  1. En el vector LETTERS, ¿Qué posición ocupa la letra V?
which(LETTERS == "V")
## [1] 22
  1. Cuando se trabaja en la consola, ¿Que hacen las flechas ↑, ↓, →, ←?

Las flechas ↑, ↓ nos permiten seleccionar, entre las formulas ingresadas y las →, ← permiten que avancemos entre la fórmula para generar alguna modificación si corresponde.

  1. Qué clase (class) tienen:
  1. NA?

Logical, es una constante logica, de longitud 1 que tiene un indicador de valor faltante.

  1. Inf?

Numeric, devuelve un vector de la misma longitud de x, indicando los elementos finitos. (c) NaN?

Numeric, no es un número.

  1. NULL?

NULL, elimina el atributo de clase.

  1. TRUE?

Logical, vector logico que se convierte en un vector entrero donde TRUE esta asignado a 1L

  1. Qué tipo (typeof) tienen:
  1. NA?

Logical, constante logica que contiene un indicador faltante.

  1. Inf?

Double, indica un resultado double, es decir que crea un vector de doble precisión.

  1. NaN?

Double, cuando los caracteres que contienen espacios en blanco, se puede convertir en un resultado que no es número.

  1. NULL?

NULL, elimina el atributo de clase.

  1. TRUE?

Logical, depende de si su argumento es de tipo logico.

  1. Qué modo (mode) tienen:
  1. NA?

Logical, calculo logico que expresa un dato faltante.

  1. Inf?

Numeric, indica que es un elemento infinito.

  1. NaN?

Numeric, informa que no es un numero.

  1. NULL?

NULL, es necesario eliminar un atributo de clase.

  1. TRUE?

logical,

  1. Diga si es verdadero o falso.

  1. Todo entero se puede convertir en carácter. falso

  2. Todo carácter se puede convertir en numérico. verdadedo

  3. Un lógico se puede convertir en numérico. verdadero

  4. Un lógico se puede convertir en carácter. verdadero

  1. Explique qué hace el siguiente código:
x1 <- 1:200
x1[!(x1%%2 == 0) & !(x1%%3 == 0) & !(x1%%7 ==0)]
##  [1]   1   5  11  13  17  19  23  25  29  31  37  41  43  47  53  55  59
## [18]  61  65  67  71  73  79  83  85  89  95  97 101 103 107 109 113 115
## [35] 121 125 127 131 137 139 143 145 149 151 155 157 163 167 169 173 179
## [52] 181 185 187 191 193 197 199

Este código nos brinda el resultado de los números divisibles por 2,3 y 7 para el vector x1

  1. A partir del siguiente código explique que hace la función duplicated sobre un vector y, además que hace la última l�nea del código.
zz <- c(9:12, 1:5, 3:7, 0:6)
zz
##  [1]  9 10 11 12  1  2  3  4  5  3  4  5  6  7  0  1  2  3  4  5  6

duplicated(zz) muestra los elementos duplicados que hay en el vector

zz[!duplicated(zz)] determina los elementos que no se repiten dentro del vector

  1. Instale el paquete leaflet y corra el siguiente codigo:

```