Skip to content

Instantly share code, notes, and snippets.

@jjesusfilho
Last active January 1, 2021 21:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jjesusfilho/6f9aed145ac494aae5f22d54bfca42c7 to your computer and use it in GitHub Desktop.
Save jjesusfilho/6f9aed145ac494aae5f22d54bfca42c7 to your computer and use it in GitHub Desktop.
Dados para tutorial sobre pivotagem
pagamentos <- structure(list(cliente = 1:10, jan = c(790L, 612L, 250L, 741L,
117L, 828L, 722L, 606L, 629L, 955L), fev = c(205L, 513L, 414L,
994L, 101L, 139L, 281L, 968L, 338L, 174L), mar = c(724L, 281L,
142L, 365L, 395L, 137L, 380L, 749L, 525L, 644L), abr = c(724L,
360L, 460L, 113L, 335L, 943L, 594L, 627L, 978L, 602L), mai = c(388L,
839L, 555L, 974L, 612L, 552L, 727L, 336L, 557L, 749L), jun = c(490L,
727L, 223L, 525L, 765L, 767L, 617L, 938L, 158L, 110L), jul = c(112L,
953L, 213L, 875L, 163L, 654L, 612L, 159L, 827L, 171L), ago = c(483L,
956L, 240L, 445L, 839L, 858L, 344L, 466L, 871L, 870L), set = c(230L,
133L, 410L, 908L, 516L, 379L, 441L, 319L, 645L, 692L), out = c(385L,
763L, 502L, 845L, 234L, 823L, 731L, 867L, 356L, 757L), nov = c(877L,
192L, 955L, 444L, 361L, 489L, 968L, 733L, 797L, 882L), dez = c(317L,
490L, 543L, 370L, 614L, 269L, 201L, 896L, 953L, 570L)), row.names = c(NA,
-10L), class = c("tbl_df", "tbl", "data.frame"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment