| function onOpen() { | |
| var ss = SpreadsheetApp.getActiveSpreadsheet(); | |
| var menuEntries = [ {name: "Update from Trello", functionName: "main"},]; | |
| ss.addMenu("Trello", menuEntries); | |
| } | |
| var api_key = "XXXXXX"; | |
| var api_token = "XXXXXX"; | |
| var board_id = "XXXXXX"; | |
| var sheetName = "sheet_name_where_you_want" |
| library(shiny) | |
| library(lazyeval) | |
| ui <- fluidPage( | |
| titlePanel("text eval"), | |
| sidebarLayout( | |
| sidebarPanel( | |
| textInput("text", | |
| "formula:", |
| # 셀레늄 패키지와 rvest 패키지를 설치합니다. | |
| source("https://install-github.me/ropensci/RSelenium") | |
| install.packages("rvest") | |
| install.packages("dplyr") | |
| # 패키지를 불러서 사용할 준비를 합니다. | |
| library(RSelenium) | |
| library(rvest) | |
| library(dplyr) |
| # source("https://install-github.me/tidyverse/googledrive") | |
| # source("https://install-github.me/tidyverse/tidyverse") | |
| # source("https://install-github.me/Rdatatable/data.table") | |
| # source("https://install-github.me/hadley/dtplyr") | |
| pack <- c("googledrive","dplyr","tidyr","purrr","data.table","dtplyr") | |
| invisible(lapply(pack, library, character.only = TRUE)) | |
| dir.create("./data") |
Yes - you can create a Kubernetes cluster with Raspberry Pis with the default operating system called Raspbian. This means you can carry on using all the tools and packages you're used to with the officially-supported OS.
| library(usethis) | |
| ## in global project | |
| create_package("package_name") | |
| ## run code, restart rstudio in "package_name" project | |
| use_roxygen_md() | |
| use_readme_rmd() | |
| use_pipe() |
| library(purrr) | |
| library(readr) | |
| library(httr) | |
| library(rvest) | |
| library(dplyr) | |
| "https://github.com/FinanceData/marcap/tree/master/data" %>% | |
| GET() %>% | |
| content() %>% | |
| html_nodes("td.content span a") %>% |
| library(randomForestSRC) | |
| library(dplyr) | |
| library(ROCR) | |
| library(doParallel) | |
| data(pbc, package="randomForestSRC") | |
| data_na <- na.omit(pbc) | |
| data_na <- data_na %>% dplyr::select(-days) |
| library(httr) | |
| library(magrittr) | |
| library(dplyr) | |
| library(stringr) | |
| library(jsonlite) | |
| tar <- "https://www.pubgesports.kr/front/team/roundChange?matchApiId=954976a0-b74d-4c2a-9ddf-6c1b7e8cac84&leagueNo=13&teamNo=4" | |
| GET(tar) %>% | |
| content("text") %>% |
| library(httr) | |
| library(dplyr) | |
| library(purrr) | |
| library(writexl) | |
| tar <- "https://kreditjob.com/api/dashboard/filter" | |
| body <- list("bjd_code"= F, | |
| "data_ym"= "1903", | |
| "industry"= F, |