Publications by Mark Perkins, Ph.D.
Emil Study
library(tidyverse) library(tidyselect) library(readxl) # Read the "Model Evaluation" tab model_evaluation <- read_excel("DataSet.xlsx", sheet = "Model Evaluation") # Read the "Tagging data" tab tagging_data <- read_excel("DataSet.xlsx", sheet = "Tagging Data") %>% mutate(ModelNum = case_when( model == "1- Initial Model" ~ "ModelOne"...
226 sym R (35599 sym/79 pcs) 3 img
K12 Job Scrape
library(tidyverse) library(rvest) library(xml2) library(rvest) library(RSelenium) library(dplyr) # Start RSelenium with Firefox browser rD <- rsDriver(browser = "firefox", port = 4444L, chromever = NULL) ## [1] "Connecting to remote server" ## $acceptInsecureCerts ## [1] FALSE ## ## $browserName ## [1] "firefox" ## ## $browserVersio...
96 sym R (202830 sym/29 pcs)
Collegium: Benchmarking peer community colleges
Load required libraries for data munging library(IPEDS) library(tidyverse) library(dplyr) library(tidycensus) library(knitr) library(RODBC) library(questionr) library(tinytex) Include your Census Key: census_api_key(“API_Key Goes here”) Get Access file path IPEDSDatabase <- odbcDriverConnect(“Driver={Microsoft Access Driver (.mdb, ....
1054 sym R (48218 sym/14 pcs)
demo
Reduce this to 900 words: Collegium: A dashboard to help community colleges find peer institutions Mark A. Perkins and Sean Field Summary Many community colleges and two-year institutions require program and institutional evaluation. However, it is often difficult to find indicators of comparison when considering an institution’s metrics as ...
11361 sym
Combining Qualtrics Surveys with Python
Setup by installing Python library. library(reticulate) use_python("C:/Users/mperki17/AppData/Local/Programs/Python/Python312/python.exe") knitr::opts_chunk$set(echo = TRUE, error=TRUE) Install Python libraries. import sys !pip install qualtricsAPI !pip install pandas import qualtricsAPI print(qualtricsAPI.__file__) Generate a list of survey...
548 sym R (6899 sym/10 pcs)
Outcomes with R and Python
knitr::opts_chunk$set(echo = TRUE) Here we present a method of using Canvas, R, and Python to extract indicators of student learning in the forms of gradebooks and rubrics. The following demonstration is a sample of the amount of coding required for this. A high level API token would make this easier because it could allow access to multiple i...
1649 sym R (19807 sym/16 pcs) 1 img
Canvas Grades
library(rcanvas) library(tidyverse) library(rJava) ##Set your canvas token: ##set_canvas_token(“TOKEN GOES Here”) ###set_canvas_domain(“https://uwyo.instructure.com/”) mark1<-get_course_list() mark<- as.data.frame(mark1)%>% select(id, name, start_at)%>% mutate(prof = "Mark") mark$date<- substr(mark$start_at,1,10) mark$date<-...
245 sym R (6286 sym/6 pcs) 1 img
CCJRP
class: center, middle, inverse, title-slide .title[ # _ ] .author[ ### Non-Traditional Status and Community College Placement ] .date[ ### Mark A. Perkins, Jonathan W. Carrier, Joseph M. Schaffer ] --- background-image: url("https://marksresearch.shinyapps.io/PictureSite/_w_6e7d5c45/image3.png") background-size:910px 700px ### Backg...
3260 sym
Credential Details
### Read the WCCC Data file WCCC<- read.csv("CC_Data.csv") WCCC$CIP<- as.character(WCCC$CIP) ### Read the UW data from the multiple tab excel file UW1617<- read_excel("UW_Data.xlsx", sheet = "2016-17") UW1718<- read_excel("UW_Data.xlsx", sheet = "2017-18") UW1718<- UW1718 %>% select(ID, Institution, TermCode, DegreeType, PROGRAM_DESC, C...
10 sym Python (3941 sym/7 pcs)
Teacher Study
class: center, middle, inverse, title-slide .title[ # _ ] .subtitle[ ## Wyoming Teacher Attrition ] .author[ ### Non-Monetary Factors and Solutions ] .date[ ### 10/10/2022 ] --- background-image: url("https://marksresearch.shinyapps.io/PictureSite/_w_6e7d5c45/image3.png") background-size:910px 700px ### Quick Introductions of P...
16868 sym