---
title: "수업 과제"
author: "홍길동 (2025012345)"       #이름과 학번을 넣으세요
date: "`r format(Sys.time(), '%Y-%m-%d %H:%M:%S')`"
format: 
  html:
    toc: false
    theme: default
echo: true  
include: true 
warning: false
embed-resources: true
---

## Task 1 {background-color="#ffebf0"}



1.  이전 슬라이드에서 녹색 파스타 비율을 포함하는 `data.frame`을 생성하시오. 이 데이터 프레임의 이름을 `pasta`로 지정하고, 비율을 포함하는 변수를 `prop_green`으로 설정하시오.\
    (힌트: `data.frame()` 함수를 사용하여 데이터 프레임을 생성할 수 있음.)\
    비율 값은 다음과 같음: `(0.7, 0.7, 0.5, 0.5, 0.3, 0.5, 0.4, 0.45, 0.55, 0.4, 0.35, 0.45, 0.45, 0.7, 0.55, 0.5, 0.35, 0.65)`



2.  `ggplot2`를 사용하여 이 비율의 히스토그램을 생성하시오.\
    `geom_histogram()` 함수에서 다음 매개변수를 사용하시오:\
    `boundary = 0.325, binwidth = 0.05`.


3.  무엇을 관찰할 수 있는가?



---

## Task 2 


33개의 표본만 추출하는 대신, 이번에는 ***1000개***를 추출해보자!

1.  데이터 [링크](https://raw.githack.com/chung-jiwoong/FMB819-Slides/refs/heads/main/chapter_sampling/data/pasta.csv)를 불러와 `pasta` 객체에 저장하라.



2.  `moderndive` 패키지의 `rep_sample_n()` 함수를 사용하여 크기 50인 표본을 1000개 생성하라.


3.  각 표본에서 초록색 파스타의 비율을 계산하라.



4.  각 표본에서 얻은 초록색 파스타 비율의 히스토그램을 그리시오.


5.  무엇을 관찰할 수 있는가? 어떤 비율이 가장 자주 발생하는가? 33개의 표본을 사용할 때와 비교하여 히스토그램의 모양이 어떻게 달라지는가?


6.  추출한 50개의 파스타 중 초록색 파스타가 20% 미만일 확률은 얼마나 되는가?