Nothing
#' @export
timor_2016 <- c(rep(15, 682), rep(16, 635), rep(17, 729), rep(18, 565),
rep(19, 515), rep(20, 474), rep(21, 385), rep(22, 426), rep(23,
369), rep(24, 393), rep(25, 384), rep(26, 381), rep(27,
389), rep(28, 401), rep(29, 370), rep(30, 390), rep(31,
339), rep(32, 371), rep(33, 342), rep(34, 347), rep(35,
310), rep(36, 264), rep(37, 198), rep(38, 204), rep(39,
199), rep(40, 270), rep(41, 311), rep(42, 318), rep(43,
276), rep(44, 265), rep(45, 248), rep(46, 266), rep(47,
206), rep(48, 231), rep(49, 154))
#' @export
timor_2009 <- c(rep(15, 741), rep(16, 668), rep(17, 652), rep(18, 612),
rep(19, 570), rep(20, 588), rep(21, 429), rep(22, 456), rep(23,
393), rep(24, 457), rep(25, 498), rep(26, 368), rep(27,
386), rep(28, 326), rep(29, 299), rep(30, 329), rep(31,
233), rep(32, 282), rep(33, 260), rep(34, 374), rep(35,
415), rep(36, 328), rep(37, 322), rep(38, 305), rep(39,
352), rep(40, 396), rep(41, 241), rep(42, 261), rep(43,
236), rep(44, 224), rep(45, 254), rep(46, 265), rep(47,
177), rep(48, 181), rep(49, 259))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.