Skip to content

Instantly share code, notes, and snippets.

View cmgiven's full-sized avatar

Chris Given cmgiven

View GitHub Profile
@cmgiven
cmgiven / sample.R
Created December 4, 2017 21:53
Example R worker
install.packages(c("ROracle", "dplyr", "lubridate", "glue", "survival"))
source("R/vacolsConnect.R")
library(dplyr)
library(lubridate)
library(glue)
library(survival)
con <- vacolsConnect()
query <- function (query) { return(dbGetQuery(con, query)) }
select
Enrollment.EnrollmentFunding.EnrollmentId,
Student.Enrollment.FacilityCode,
Universal.Agency.Name,
Student.Student.SASID,
Student.StudentDetails.LastName,
Student.StudentDetails.FirstName,
Student.StudentDetails.MiddleName,
/* MISSING: Suffix */
Student.StudentDetails.Dob,
@cmgiven
cmgiven / cms-acronyms.csv
Created April 21, 2020 20:14
CMS Acronyms
acronym definition
4I 4 Innovation (System)
ACA Patient Protection and Affordable Care Act
ACE Acute Care Episode
ACO Accountable Care Organization
ACO-MS Accountable Care Organization - Management System
ACO-OS Accountable Care Organization - Operational System
ACO-UI Accountable Care Organization - User Interface
AGI Adjusted Gross Income
AHRQ Agency for Healthcare Research and Quality