+++ /dev/null
-cat('hello world!')
-install.packages('tidyverse')
-quit90
-quit
-quit()
-source('~/Documents/R for data science/3 Data visualization.r', echo=TRUE)
-source('~/Documents/R for data science/3 Data visualization.r', echo=TRUE)
-ggplot(data = mpg)
-library(tidyverse)
-ggplot(data = mpg)
-ggplot(data = mpg) +
-geom_point(mapping = aes(x=displ, y=hwy))
-mpg
-ggplot(data=mpg) +
-geom_point(mapping = aes(x=class, y=drv))
-```{r}
-plot(cars)
-install.packages("shiny")
-shiny::runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-faithful
-?faithful
-x <- faithful[, 2]
-bins <- seq(min(x), max(x), length.out = 11)
-bins
-x
-(max(x)-min(x))/11
-(max(x)-min(x))/10
-?bins
-bins?
-d
-typeof(bins)
-typeof(x)
-hist(x, breaks=bins, col='darkgray', border='white')
-library('tidyverse')
-faithful
-faithful[['waiting']]
-faithful.waiting
-faithful$waiting
-faithful['waiting']
-ggplot(data = faithful) +
-geom_histogram(mapping = aes(x=waiting))
-?geom_histogram
-geom_histogram(mapping = aes(x=waiting), bins=50)
-?geom_histogram
-ggplot(data = faithful) +
-geom_histogram(mapping = aes(x=waiting), bins=50)
-ggplot(data = faithful) +
-geom_histogram(mapping = aes(x=waiting), bins=50. cp;p)
-ggplot(data = faithful) +
-geom_histogram(mapping = aes(x=waiting), bins=50, color='white')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-g
-runApp()
-runApp()
-runApp()
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-scatter
-?scatter
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-sliderInput(inputId = 'inp1', label='look at this sick slider', value=5, min=1, max=10)
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-?radioButtons
-?c
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp()
-runApp()
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp()
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-renderPlot({
-x <- rnorm(input$num)
-hist(x)
-})
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-?hist
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-runApp()
-runApp('Documents/Rshiny/my-first-shiny-webapp')
-?column
-??column
-?shiny:column
-install.packages('renv')
-install.packages('rsconnect')
-rsconnect::setAccountInfo(name='ibidyouadu', token='71ED4FEDAF57251FDDD0C73B2F51A5D4', secret='3sFYCmMbFk+xEZKLP9EcEat+PVAzvK9Jm5fs8QqT')
-getwd()
-cd
-%cd
-dir
-getwd()
-setwd('Documents/projects/liftboard/')
-rsconnect::deployApp()
-install.package('rsconnect')
-install.packages('rsconnect')
-rsconnect::setAccountInfo(name='ibidyouadu', token='71ED4FEDAF57251FDDD0C73B2F51A5D4', secret='3sFYCmMbFk+xEZKLP9EcEat+PVAzvK9Jm5fs8QqT')
-getwd()
-rsconnect::deployApp()
+++ /dev/null
-build-last-errors="[]"
-build-last-errors-base-dir=""
-build-last-outputs="[]"
-compile_pdf_state="{\"tab_visible\":false,\"running\":false,\"target_file\":\"\",\"output\":\"\",\"errors\":[]}"
-files.monitored-path=""
-find-in-files-state="{\"handle\":\"\",\"input\":\"\",\"path\":\"\",\"regex\":false,\"ignoreCase\":false,\"results\":{\"file\":[],\"line\":[],\"lineValue\":[],\"matchOn\":[],\"matchOff\":[],\"replaceMatchOn\":[],\"replaceMatchOff\":[]},\"running\":false,\"replace\":false,\"preview\":false,\"gitFlag\":false,\"replacePattern\":\"\"}"
-imageDirtyState="0"
-saveActionState="0"