Cijfers na de komma bij π

Sign in to test your solution.
# needed library library(readr) # downloading 100 000 digits of pi url <- "https://www.angio.net/pi/digits/100000.txt" getalpi.raw <- readr::read_file(url) # splitting string into single characters getalpi <- data.frame(strsplit(getalpi.raw, "")[1]) # removing the "." i.e. 2nd row getalpi <- data.frame(getalpi[-c(1,2),]) data <- as.data.frame(table(getalpi[,1], dnn = list("cijfer")), responseName = "aantal") # Noteer hieronder je code
You can submit as many times as you like. Only your latest submission will be taken into account.
Sign in to test your solution.