yeedle

041adf4cc10534b649bfaeed80934e4369203cabff2756e57453bb99472c7897beb04d71b16f83217631ea0628d114d4fe78b9e045c885c62205aca860db0c0775;realazthat

yeedle

library(rvest)
library(stringr)
library(tidyverse)

page <- read_html("https://www.tiobe.com/tiobe-index/r/")

script <- page %>% 
  html_node("body > section > section > section > article > script") %>%
  html_text()

yeedle

Keybase proof

I hereby claim:

• I am yeedle on github.
• I am yeedle (https://keybase.io/yeedle) on keybase.
• I have a public key ASAAPQHuf4Regji3HsrhtW0tKbOSvMjHlV1lSpxv6zbvPAo

To claim this, I am signing this object:

yeedle

library(tidyverse)
library(R.utils)
library(glue)
library(padr)
library(ggExtra)
library(lubridate)
library(scales)
library(hrbrthemes)

#london

yeedle

library(tidyverse)
library(R.utils)
library(glue)
library(magrittr)
library(weathermetrics)
library(padr)
library(ggExtra)
library(lubridate)
library(scales)
library(hrbrthemes)

yeedle

library(tidyverse)
library(rvest)
library(lubridate)
library(ggalt)

obama_url <- "http://www.rasmussenreports.com/public_content/politics/obama_administration/obama_approval_index_history"
trump_url <- "http://www.rasmussenreports.com/public_content/politics/trump_administration/trump_approval_index_history"

index <- list(obama = obama_url, trump = trump_url) %>%
  map_df(~ read_html(.x) %>% 

yeedle

library(tidyverse)
#> + ggplot2 2.2.1.9000        Date: 2017-05-20
#> + tibble  1.3.1                R: 3.4.0
#> + tidyr   0.6.3               OS: elementary OS 0.4.1 Loki
#> + readr   1.1.1              GUI: X11
#> + purrr   0.2.2.2         Locale: en_US.UTF-8
#> + dplyr   0.5.0.9005          TZ: posixrules
#> + stringr 1.2.0           
#> + forcats 0.2.0

yeedle

#' Replace categorical x-axis labels with images
#'
#' Pipe a ggplot2 graph (with categorical x-axis) into this function with the argument of a list of 
#' pictures (e.g. loaded via readImage) and it builds a new grob with the x-axis categories 
#' now labelled by the images. Solves a problem that you perhaps shouldn't have.
#'
#' @author J. Carroll, \email{jono@@jcarroll.com.au}
#' @references \url{http://stackoverflow.com/questions/29939447/icons-as-x-axis-labels-in-r-ggplot2}
#' 
#' @param g     ggplot graph with categorical x axis

yeedle

getPackages <- function(packs){
  packages <- unlist(
    tools::package_dependencies(packs, available.packages(),
                                which=c("Depends", "Imports"), recursive=TRUE)
  )
  packages <- union(packs, packages)
  packages
}

packages <- getPackages(c("ggplot2", "MASS"))

yeedle

using System;
using System.Linq;
using System.Collections.Generic;

public static class ExtnesionMethods {
  
  public static IEnumerable<T> MaxOverPrevious<T, S>(this IEnumerable<T> enumerable, Func<T, S> comparable) where S : IComparable<S>
  {
    if (!enumerable.Any()) yield break;