#Sample Solution
---
title: "Data Cleaning in R"
output: html_notebook
---
```{r message=FALSE, warning=FALSE}
# load libraries
library(readr)
library(dplyr)
```
```{r}
# list files
student_files <- list.files(pattern = "exams_.*csv")
```
```{r message=FALSE}
# read files
df_list <- lapply(student_files,read_csv)
```
```{r}
# concatenate data frames
students <- bind_rows(df_list)
students
```
```{r}
# number of rows in students
nrow_students <- 1000
```
No comments:
Post a Comment