Matt mattbaggott
chrisalbon
/ tweet_deleting_script.py
Last active
February 25, 2022 08:01
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
| # -*- coding: utf-8 -*- | |
| """ Deletes all tweets below a certain retweet threshold. | |
| """ | |
| import tweepy | |
| from datetime import datetime | |
| # Constants | |
| CONSUMER_KEY = '' |
joseph-rickert
/ BIG DATA with RevoScale R
Created
February 8, 2013 22:39
Scripts for 2/14/13 Webinar Introduction to R for Data Mining
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
| #------------------------------------------------------------ | |
| # REVOLUTION ANALYTICS WEBINAR: INTRODUCTION TO R FOR DATA MINING | |
| # February 14, 2013 | |
| # Joseph B. Rickert | |
| # Technical Marketing Manager | |
| # | |
| # BIG DATA with RevoScaleR | |
| # | |
| # Copyright: Revolution Analytics |
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
| doInstall <- TRUE | |
| toInstall <- c("Amelia", "ggplot2") | |
| if(doInstall){install.packages(toInstall, repos = "http://cran.us.r-project.org")} | |
| lapply(toInstall, library, character.only = TRUE) | |
| ANES <- read.csv("http://www.oberlin.edu/faculty/cdesante/assets/downloads/ANES.csv") | |
| ANES <- ANES[ANES$year == 2008, -c(1, 11, 17)] # Limit to just 2008 respondents, | |
| head(ANES) # remove some non-helpful variables | |
| with(ANES, plot(jitter(pid7), jitter(ideo7))) |