---
title: "Test Knit"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

# Test

This is a test to see if knitting works.

```{r test}
library(tidyverse)
print("Libraries loaded successfully")
```

```{r test-data}
data <- read.csv("exp1.csv")
print(paste("Data loaded:", nrow(data), "rows"))
```