| Title: | Michigan State University (MSU) Palettes and Themes |
|---|---|
| Description: | Defines colour palettes and themes for Michigan State University (MSU) publications and presentations. Palettes and themes are supported in both base R and 'ggplot2' graphics, and are intended to provide consistency between those creating documents and presentations. |
| Authors: | Emilio Xavier Esposito [aut, cre, cph] (ORCID: <https://orcid.org/0000-0002-6193-0485>, GitHub: https://github.com/emilioxavier), Nicola Rennie [aut], Michigan State University [fnd] |
| Maintainer: | Emilio Xavier Esposito <[email protected]> |
| License: | CC BY-SA 4.0 |
| Version: | 1.0.1 |
| Built: | 2026-05-26 05:59:23 UTC |
| Source: | https://github.com/emilioxavier/msuthemes |
A comprehensive dataset containing institutional characteristics, enrollment data, financial information, and demographic composition for all Big Ten Conference member institutions from 1996 to 2023. This dataset tracks the evolution of these universities over nearly three decades, including data for institutions that joined the conference at different times.
BigTenBigTen
A data frame with 504 rows and 38 variables:
Character. Institution name (e.g., "MSU", "Michigan", "Ohio State")
Logical. Whether the institution is a land-grant university
Logical. Whether the institution is public (TRUE) or private (FALSE)
Logical. Whether the institution is a member of the Association of American Universities
Numeric. Year the data entry corresponds to (1996-2023)
Integer. Total undergraduate enrollment
Numeric. Admission rate (proportion of applicants admitted)
Numeric. Completion rate for first-time, full-time students (150% of expected time)
Numeric. Percentage of undergraduates receiving Pell grants
Integer. Number of undergraduates receiving Pell grants
Integer. In-state tuition and fees
Integer. Out-of-state tuition and fees
Integer. Net tuition revenue per full-time equivalent student
Integer. Average cost of books and supplies
Integer. Average cost of room and board for on-campus students
Integer. Other expenses for on-campus students
Integer. Other expenses for students living with family
Integer. Total cost of attendance for in-state students
Integer. Total cost of attendance for out-of-state students
Integer. Total other costs
Integer. Total full-time equivalent tuition plus other costs
Numeric. Ratio of full-time equivalent tuition plus other costs to in-state to total costs
Numeric. Proportion of white undergraduate students
Numeric. Proportion of Black undergraduate students
Numeric. Proportion of Hispanic undergraduate students
Numeric. Proportion of Asian undergraduate students
Numeric. Proportion of American Indian/Alaska Native undergraduate students
Numeric. Proportion of Native Hawaiian/Pacific Islander undergraduate students
Numeric. Proportion of students of two or more races
Numeric. Proportion of non-resident alien undergraduate students
Numeric. Proportion of students with unknown race/ethnicity
Numeric. Proportion of white non-Hispanic undergraduate students
Numeric. Proportion of Black non-Hispanic undergraduate students
Numeric. Proportion of Asian/Pacific Islander undergraduate students
Numeric. Proportion of American Indian/Alaska Native students (legacy coding)
Numeric. Proportion of Hispanic students (legacy coding)
Numeric. Proportion of male undergraduate students
Numeric. Proportion of female undergraduate students
The dataset includes all 18 current Big Ten Conference members:
Original members: Illinois, Indiana, Iowa, Michigan, Minnesota, Northwestern, Ohio State, Purdue, Wisconsin
1990 addition: MSU (Michigan State University)
1993 addition: Penn State
2011 addition: Nebraska
2014 additions: Maryland, Rutgers
2024 additions: UCLA, USoCal (USC), Oregon, Washington
Data availability varies by year and institution. Earlier years (especially 1996-2000) may have limited data for some variables. Financial data and demographic breakdowns became more standardized and complete in later years.
The dataset is particularly useful for:
Longitudinal analysis of Big Ten institutions
Comparative studies across public vs. private institutions
Analysis of conference expansion impacts
Demographic trend analysis in higher education
Cost and accessibility studies
Compiled from multiple institutional and federal data sources including the Integrated Postsecondary Education Data System (IPEDS) and institutional reports. Data spans 1996-2023. The dataset is a subset of the College Scorecard dataset (https://collegescorecard.ed.gov/data/), focusing on Big Ten institutions.
bigten_colors_primary, bigten_colors_secondary
for Big Ten institutional color palettes that correspond to the institutions
in this dataset.
# Load the dataset data(BigTen) # View structure str(BigTen) # Check institutions included unique(BigTen$name) # Examine enrollment trends over time if (require(ggplot2)) { library(ggplot2) BigTen_recent <- subset(BigTen, entry_term >= 2010 & !is.na(UGDS)) ggplot(BigTen_recent, aes(x = entry_term, y = UGDS, color = name)) + geom_line() + scale_color_bigten_d(palette = "primary") + theme_MSU() + labs(title = "Big Ten Undergraduate Enrollment Trends", x = "Year", y = "Undergraduate Enrollment") } # Compare public vs private institutions table(unique(BigTen[c("name", "Public.tf")])$Public.tf)# Load the dataset data(BigTen) # View structure str(BigTen) # Check institutions included unique(BigTen$name) # Examine enrollment trends over time if (require(ggplot2)) { library(ggplot2) BigTen_recent <- subset(BigTen, entry_term >= 2010 & !is.na(UGDS)) ggplot(BigTen_recent, aes(x = entry_term, y = UGDS, color = name)) + geom_line() + scale_color_bigten_d(palette = "primary") + theme_MSU() + labs(title = "Big Ten Undergraduate Enrollment Trends", x = "Year", y = "Undergraduate Enrollment") } # Compare public vs private institutions table(unique(BigTen[c("name", "Public.tf")])$Public.tf)
Named vector of Big Ten primary colors for reliable institution matching
bigten_colors_primarybigten_colors_primary
An object of class character of length 22.
Named vector of Big Ten secondary colors for reliable institution matching
bigten_colors_secondarybigten_colors_secondary
An object of class character of length 22.
Get Big Ten colors for specific institutions
get_bigten_colors(institutions, type = "primary")get_bigten_colors(institutions, type = "primary")
institutions |
Character vector of institution names (should match names in bigten_colors_primary) |
type |
Either "primary" or "secondary" colors |
Named character vector of hex colors
# Get primary colors for specific institutions get_bigten_colors(c("Michigan", "Ohio State", "MSU")) # Get secondary colors get_bigten_colors(c("Michigan", "Northwestern"), type = "secondary") # Use in ggplot with scale_fill_manual library(ggplot2) my_colors <- get_bigten_colors(c("Michigan", "Ohio State", "MSU")) BigTenData <- data.frame( institution = c("Michigan", "Ohio State", "MSU"), value = c(10, 15, 20) ) ggplot(data=BigTenData) + geom_bar(aes(x = institution, y = value, fill = institution), stat="identity") + scale_fill_manual(values = my_colors)# Get primary colors for specific institutions get_bigten_colors(c("Michigan", "Ohio State", "MSU")) # Get secondary colors get_bigten_colors(c("Michigan", "Northwestern"), type = "secondary") # Use in ggplot with scale_fill_manual library(ggplot2) my_colors <- get_bigten_colors(c("Michigan", "Ohio State", "MSU")) BigTenData <- data.frame( institution = c("Michigan", "Ohio State", "MSU"), value = c(10, 15, 20) ) ggplot(data=BigTenData) + geom_bar(aes(x = institution, y = value, fill = institution), stat="identity") + scale_fill_manual(values = my_colors)
MSU black hex colour
msu_blackmsu_black
An object of class character of length 1.
MSU blue (aka blue-grey or blue-gray) hex colour
msu_bluemsu_blue
An object of class character of length 1.
MSU dark grey hex colour
msu_darkgreymsu_darkgrey
An object of class character of length 1.
MSU Excellence Green hex colour
msu_Excellencemsu_Excellence
An object of class character of length 1.
MSU Spartan Green hex colour
msu_greenmsu_green
An object of class character of length 1.
MSU grey/gray hex colour
msu_greymsu_grey
An object of class character of length 1.
MSU Kelly Green hex colour
msu_Kellymsu_Kelly
An object of class character of length 1.
MSU Lime Green hex colour
msu_Limemsu_Lime
An object of class character of length 1.
MSU orange hex colour
MSU (burnt) orange hex colour
msu_orange msu_orangemsu_orange msu_orange
An object of class character of length 1.
An object of class character of length 1.
MSU peach hex colour
msu_peachmsu_peach
An object of class character of length 1.
MSU purple hex colour
msu_purplemsu_purple
An object of class character of length 1.
MSU red hex colour
msu_redmsu_red
An object of class character of length 1.
MSU Refresh Green hex colour
msu_Refreshmsu_Refresh
An object of class character of length 1.
MSU split pea hex colour
msu_splitpeamsu_splitpea
An object of class character of length 1.
MSU teal hex colour
msu_tealmsu_teal
An object of class character of length 1.
MSU white hex colour
msu_whitemsu_white
An object of class character of length 1.
MSU yellow (aka yellow-green or grellow) hex colour
msu_yellowmsu_yellow
An object of class character of length 1.
Generates the colour palettes
MSUcols(palette, n, type = "discrete", direction = 1)MSUcols(palette, n, type = "discrete", direction = 1)
palette |
Name of Palette. Run |
n |
Number of desired colors. If number of requested colors is beyond the scope of the palette, colors are automatically interpolated. If n is not provided, the length of the palette is used. |
type |
Either "continuous" or "discrete". Use continuous if you want to automatically interpolate between colors. Default "discrete" |
direction |
Sets order of colors. Default palette is 1. If direction is -1, palette color order is reversed |
A character vector of hex colour codes.
MSUcols("msu_seq")MSUcols("msu_seq")
This file contains only MSU palettes and MSU colour variables.
MSUpalettesMSUpalettes
An object of class list of length 11.
Function for printing palette
## S3 method for class 'palette' print(x, ...)## S3 method for class 'palette' print(x, ...)
x |
the object to be printed. |
... |
further arguments to be passed to or from other methods. They are ignored in this function. |
A plot of the specified colour palette.
print(MSUcols("msu_qual1"))print(MSUcols("msu_qual1"))
Plotting with Big Ten palettes for colour ggplot2
scale_color_bigten_c(palette = "primary", direction = 1, ...)scale_color_bigten_c(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_color_bigten_c(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_color_bigten_c(palette = "primary")
Plotting with Big Ten palettes for colour ggplot2
scale_color_bigten_d(palette = "primary", direction = 1, ...)scale_color_bigten_d(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_color_bigten_d(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_color_bigten_d(palette = "primary")
Plotting with MSU palettes for colour ggplot2
scale_color_msu_c(palette, direction = 1, ...)scale_color_msu_c(palette, direction = 1, ...)
palette |
name of palette. Run |
direction |
Sets order of colors. Default palette_choice is 1. If direction is -1, palette_choice color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_color_msu_c(palette = "msu_seq")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_color_msu_c(palette = "msu_seq")
Plotting with MSU palettes for colour ggplot2
scale_color_msu_d(palette, direction = 1, ...)scale_color_msu_d(palette, direction = 1, ...)
palette |
Name of Palette. Run |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_color_msu_d(palette = "msu_qual1")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_color_msu_d(palette = "msu_qual1")
Plotting with Big Ten palettes for colour ggplot2 (British spelling)
scale_colour_bigten_c(palette = "primary", direction = 1, ...)scale_colour_bigten_c(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, colour = wt)) + geom_point() + scale_colour_bigten_c(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, colour = wt)) + geom_point() + scale_colour_bigten_c(palette = "primary")
Plotting with Big Ten palettes for colour ggplot2 (British spelling)
scale_colour_bigten_d(palette = "primary", direction = 1, ...)scale_colour_bigten_d(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, colour = factor(cyl))) + geom_point() + scale_colour_bigten_d(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, colour = factor(cyl))) + geom_point() + scale_colour_bigten_d(palette = "primary")
Plotting with MSU palettes for colour ggplot2
scale_colour_msu_c(palette, direction = 1, ...)scale_colour_msu_c(palette, direction = 1, ...)
palette |
name of palette. Run |
direction |
Sets order of colors. Default palette_choice is 1. If direction is -1, palette_choice color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_colour_msu_c(palette = "msu_seq")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + scale_colour_msu_c(palette = "msu_seq")
Plotting with MSU palettes for colour ggplot2
scale_colour_msu_d(palette, direction = 1, ...)scale_colour_msu_d(palette, direction = 1, ...)
palette |
Name of Palette. Run |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_colour_msu_d(palette = "msu_qual1")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = factor(cyl))) + geom_point() + scale_colour_msu_d(palette = "msu_qual1")
Plotting with Big Ten palettes for fill ggplot2
scale_fill_bigten_c(palette = "primary", direction = 1, ...)scale_fill_bigten_c(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous fill scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, fill = wt)) + geom_point(shape = 21) + scale_fill_bigten_c(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, fill = wt)) + geom_point(shape = 21) + scale_fill_bigten_c(palette = "primary")
Plotting with Big Ten palettes for fill ggplot2
scale_fill_bigten_d(palette = "primary", direction = 1, ...)scale_fill_bigten_d(palette = "primary", direction = 1, ...)
palette |
Type of palette: "primary" or "secondary" |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete fill scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, fill = factor(cyl))) + geom_point(shape = 21) + scale_fill_bigten_d(palette = "primary")library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, fill = factor(cyl))) + geom_point(shape = 21) + scale_fill_bigten_d(palette = "primary")
Plotting with MSU palettes for fill with ggplot2
scale_fill_msu_c(palette, direction = 1, ...)scale_fill_msu_c(palette, direction = 1, ...)
palette |
name of palette. Run |
direction |
Sets order of colors. Default palette_choice is 1. If direction is -1, palette_choice color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a continuous colour scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = cyl, y = disp, fill = cyl)) + geom_col() + scale_fill_msu_c(palette = "msu_seq")library(ggplot2) ggplot(data = mtcars, aes(x = cyl, y = disp, fill = cyl)) + geom_col() + scale_fill_msu_c(palette = "msu_seq")
Plotting with MSU palettes for fill colour ggplot2
scale_fill_msu_d(palette, direction = 1, ...)scale_fill_msu_d(palette, direction = 1, ...)
palette |
name of palette. Run |
direction |
Sets order of colors. Default direction is 1. If direction is -1, palette_choice color order is reversed |
... |
Other arguments passed on to |
A ggproto object defining a discrete fill scale for use with ggplot2.
library(ggplot2) ggplot(data = mtcars, aes(x = cyl, y = disp, fill = factor(cyl))) + geom_col() + scale_fill_msu_d(palette = "msu_qual1")library(ggplot2) ggplot(data = mtcars, aes(x = cyl, y = disp, fill = factor(cyl))) + geom_col() + scale_fill_msu_d(palette = "msu_qual1")
Set MSU base R plotting palette
set_msu_palette(palette)set_msu_palette(palette)
palette |
Name of palette. See |
Returns a character vector giving the colors from the palette which was in effect. This is invisible unless the argument is omitted.
set_msu_palette("msu_qual1")set_msu_palette("msu_qual1")
Set MSUthemes base R graphical parameters
set_msu_par( family = "Metropolis", adj = 0, mar = c(5, 3, 3, 2.5), bty = "n", ... )set_msu_par( family = "Metropolis", adj = 0, mar = c(5, 3, 3, 2.5), bty = "n", ... )
family |
Font used for all text elements. Default "Metropolis". |
adj |
Alignment of text for title. Default 0. |
mar |
Margins. Default |
bty |
Axis lines. Default "n". |
... |
Additional arguments passed to |
Returns an invisible named list.
# save user's current par values that this function will change oldpar <- par("family", "adj", "mar", "bty") set_msu_par() plot(1:4, 1:4, col=1:4, main = "Title") par(oldpar)# save user's current par values that this function will change oldpar <- par("family", "adj", "mar", "bty") set_msu_par() plot(1:4, 1:4, col=1:4, main = "Title") par(oldpar)
Custom ggplot2 theme
theme_MSU( base_size = 11, base_family = "Metropolis", header_family = NULL, base_line_size = base_size/22, base_rect_size = base_size/22, rel_small = 12/14, rel_tiny = 11/14, rel_large = 16/14, ink = "black", paper = "white", accent = "#3366FF" )theme_MSU( base_size = 11, base_family = "Metropolis", header_family = NULL, base_line_size = base_size/22, base_rect_size = base_size/22, rel_small = 12/14, rel_tiny = 11/14, rel_large = 16/14, ink = "black", paper = "white", accent = "#3366FF" )
base_size |
Base font size for text elements. Default 12. |
base_family |
Font used for all text elements. Default "Metropolis". |
header_family |
Font family for titles and headers. The default, NULL, uses theme inheritance to set the font. This setting affects axis titles, legend titles, the plot title and tag text. |
base_line_size |
Base line size is |
base_rect_size |
Base rectangle size is |
rel_small |
Relative size of small text (e.g., axis tick labels) |
rel_tiny |
Relative size of tiny text (e.g., caption) |
rel_large |
Relative size of large text (e.g., title) |
ink |
Text colour. Default "black". |
paper |
Background colour. Default "white". |
accent |
Accent colour. Default bright blue, "#3366FF" |
A ggplot2 theme
library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + theme_MSU()library(ggplot2) ggplot(data = mtcars, aes(x = mpg, y = disp, color = wt)) + geom_point() + theme_MSU()
Prints all available colour palettes
view_all_palettes()view_all_palettes()
A plot of all colour palettes available in the package.
view_all_palettes()view_all_palettes()