-
Notifications
You must be signed in to change notification settings - Fork 1
/
practica-01.R
105 lines (75 loc) · 2.04 KB
/
practica-01.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
#' zona de notas
#'
# practica 01 -------------------------------------------------------------
hola #error
"hola"
a <- 5 #no imprime resultado
(a <- 5) #sí imprime resultado
# operaciones aritméticas -------------------------------------------------
2
2+2
4-2
2*5
10/2
((2*4)+(7^3/(1/ (5^2)))-755)^2
# asignar o crear objetos -------------------------------------------------
x <- 2
x+2
x-1
x*3
x/2
x^2 +2*x + 4
# funciones --------------------------------------------------
1:10
seq(1,10)
rep(1,5)
a <- 1
b <- "uno"
c <- TRUE
# class te dice qué tipo de objeto es
class(a)
class(b)
class(c)
# vectores ----------------------------------------------------------------
heights <- c(147.2, 153.5, 152.5, 162.0, 153.9, 156.2, 152.6, 151.9, 154.3)
mean(heights)
sd(heights)
summary(heights)
# pipe --------------------------------------------------------------------
# este símbolo "%>%" es llamado pipe
# usa (Ctrl + Shit + M) para crearlo
heights
mean(heights)
heights %>% mean() #error si no tienes invocado el paquete tidyverse
library(tidyverse) # pipe podrá ser usado al ejecutar esta línea
heights %>% mean()
heights %>% mean() %>% log10()
heights %>% mean() %>% log10() %>% class()
class(heights)
# funciones y argumentos ---------------------------------------------------
alturas <- c(NA, 153.5, 152.5, 162.0, 153.9, 156.2, 152.6, 151.9, 154.3)
alturas
mean(alturas) #error
sd(alturas) #error
mean(alturas,na.rm = TRUE)
sd(alturas,na.rm = T)
summary(alturas)
# subconjuntos ------------------------------------------------------------
y <- LETTERS[1:10]
y
y[1]
y[5]
y[3:7]
y[c(1,3,5,6)]
y[3] <- "hola"
y
z <- c("hola","mi","nombre","es","_____")
# gráficos básicos -------------------------------------------------------
bw <- "blue"
hist(heights)
hist(heights,col = bw)
# dataframes --------------------------------------------------------------
women #dataframe que posee más de un vector
women$height #accedes al vector de altura
plot(women) #genera scatterplot automático
hist(women$height) #genera un histogram de un vector específico