Module # 13


Issaiah. Jennings

Module # 13


For this cool animation, I used the animation package in R to create a GIF that shows how a histogram changes as the mean of a dataset increases over time. It’s basically a moving picture of data that shifts a little more to the right with each frame. I really enjoyed this assignment give it a try! 

library(animation)

>

> ani.options(interval = 0.05) # 100 / 0.05 = 20 fps

>

>

> # Save the animated histogram

> saveGIF({

+ par(mar = c(4, 4, 2, 1)) # Set margins

+ for (i in 1:100) {

+ # Simulate normal data, shifting the mean over time

+ data <- rnorm(200, mean = i * 0.1, sd = 1)

+

+ # Plot histogram

+ hist(data,

+ breaks = 20,

+ col = "skyblue",

+ border = "white",

+ main = paste("Iteration:", i),

+ xlim = c(0, 20),

+ ylim = c(0, 40),

+ xlab = "Value",

+ ylab = "Frequency")

+

+ # Add a vertical line at the mean

+ abline(v = mean(data), col = "red", lwd = 3)

+ }

+ }, movie.name = "shifting_histogram.gif")

Output at: shifting_histogram.gif

[1] TRUE

>

Comments

Post a Comment

Popular posts from this blog

Final project in this class Spring 2025

Image
Final Project: U.S. State Public-School Expenditures   Name: Issaiah Jennings   Course: LIS4317.001S25.15856 – Visual Analytics   Semester: Spring 2025   Software Used: RStudio   Step 1: Selecting the Dataset For this project, I decided to work with the Anscombe U.S. State Public-School Expenditures dataset, which comes built into R, so it was easy to access and start working with. I chose this dataset because it includes a solid mix of variables related to education spending and student outcomes across all 50 U.S. states. It’s the kind of data that can help answer real-world questions about how money might impact education. Some of the main variables I focused on are: Expenditure per student – This shows how much each state spends on average for every student enrolled in public school. Graduation rate – This tells us what percentage of students are finishing high school in each state. Average income of residents – This giv...
Read more

Module # 5 assignment

Image
Issaiah Jennings  Module # 5 assignment In this visualization, I explored two design frameworks: Part to Whole and Ranking, using the dataset containing Average Position and Time. Part to Whole: Pie Chart The pie chart shows how Time is distributed across different Average Position values. Each slice represents a proportion of Time for a given position, helping to visualize how much each position contributes to the total Time. This is a typical "Part to Whole" design, which makes it easy to see the relationship between the categories and their contributions. Ranking: Scatter Plot The scatter plot shows how Average Position affects Time. Each point on the graph represents a pair of Average Position and Time values. By looking at this, you can spot trends—like how Time increases as Average Position rises. This type of plot is great for understanding relationships and rankings between two variables. import pandas as pd  # Import pandas for data manipulation import plotly.express...
Read more

Assignment # 4: Time Series Visualization Using Tableau Public

Image
Time Series Visualization  The goal of this assignment is for you to  create a time-series visualization  using  Tableau Public  based on a curated dataset. You will work with  Monthly Modal Time Series data  sourced from  Data.gov , which contains  12 different variables I created a tree map to show the ridership of a select few cities in the dataset. A tree map is a great way to visually compare the relative size of each city’s ridership. The bigger the block, the higher the ridership for that city. From the tree map, it’s clear that Philadelphia has a much larger ridership compared to the other cities. This makes sense because it’s one of the largest cities in the U.S. with a dense transit system. This chart helped me quickly identify which cities are leading in ridership and which ones have smaller numbers. For the Area Chart, I focused on vehicle revenue miles, vehicle revenue hours, and ridership from 2014 to 2019. An area chart...
Read more