R Notebook

rr library(tidyverse)

-- Attaching packages --------------------------------------- tidyverse 1.2.1 --
v ggplot2 3.0.0     v purrr   0.2.5
v tibble  1.4.2     v dplyr   0.7.6
v tidyr   0.8.1     v stringr 1.3.1
v readr   1.1.1     v forcats 0.3.0
-- Conflicts ------------------------------------------ tidyverse_conflicts() --
x dplyr::filter() masks stats::filter()
x dplyr::lag()    masks stats::lag()

rr curso <- tibble( fila = c(2, 2, 2, 2, 1, 1), columna = c(1,2,3,4, 3, 5), alumno = c(, , , , , ), )

rr tidyr::spread(curso, key = columna, value = alumno)

rr diccionario <- curso %>% distinct(fila) %>% arrange(fila) %>% mutate(medida = c(, _osea), valor_promedio = c(1.66, 89))

Juntar dos tablas

nombre tabal 1, nombra tabla 2 y columnas en común

rr curso <- dplyr::left_join(curso, diccionario, by = )

rr tidyr::spread(curso, key = medida, value = valor_promedio)

curso <- tibble(
  alumno = c("Pato", "JLO", "Chris"),
  ramo = rep("ramo 2", 3),
  nota_promedio = c(5.7, 5.5, 6,2)
)

Error in tibble(alumno = c("Pato", "JLO", "Chris"), ramo = rep("ramo 2",  : 
  could not find function "tibble"