Chris Given cmgiven

	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

CMMi Reading List

I hereby claim:

I am cmgiven on github.
I am cmgiven (https://keybase.io/cmgiven) on keybase.
I have a public key whose fingerprint is A08A 263C F610 EF95 8CDB 84F0 CF79 B8A5 DDC3 931E

To claim this, I am signing this object:

	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,

	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)) }

	library("dplyr")
	library("tidyr")
	library("cooccur")

	options(stringsAsFactors=FALSE)

	bhs <- read.csv("Behavioral Health Services - higher grouping.csv") %>%
	mutate(
	SVC_START_DT = as.Date(SVC_START_DT, "%m/%d/%Y"),
	SVC_END_DT = as.Date(SVC_END_DT, "%m/%d/%Y"),

	library("dplyr")

	options(stringsAsFactors=FALSE)

	bhs <- read.csv("Behavioral Health Services.csv") %>%
	mutate(
	SVC_START_DT = as.Date(SVC_START_DT, "%m/%d/%Y"),
	SVC_END_DT = as.Date(SVC_END_DT, "%m/%d/%Y"),
	SUBMT_DT = as.Date(SUBMT_DT, "%m/%d/%Y")
	)

	license: mit
	height: 640