This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(shiny) | |
| library(datasets) | |
| shinyServer(function(input, output) { | |
| output$carsPlot <- renderPlot({ | |
| hist(mtcars[,input$variable], | |
| main = "Histogram of mtcars variables", | |
| xlab = input$variable) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Learn more about QQL: https://www.quintly.com/features/qql/ | |
| Average Instagram Posts Per Weekday | |
| SELECT "Average Posts By Weekday" AS dim1, dim2, AVG(posts) FROM (SELECT profileId, STRFTIME('%w', time) AS dim2, (SUM(images)+SUM(videos)) AS posts FROM instagram GROUP BY profileID, dim2) GROUP BY dim2 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #Finding unique libraries from complete Data Science course series... | |
| library(knitr) | |
| #Johns Hopkins Data Science Certificate repo | |
| #https://github.com/DataScienceSpecialization/courses | |
| #Set to your own working directory where .Rmd forked GitHub files reside | |
| path <- setwd("~/R/Data_Science_Johns Hop/datasciencecoursera/courses") | |
| #path = getwd() |