MIDTERM

install.packages("ggplot2")

## Installing package into 'C:/Users/user/Documents/R/win-library/3.6'
## (as 'lib' is unspecified)

## Error in contrib.url(repos, "source"): trying to use CRAN without setting a mirror

install.packages("dplyr")

## Installing package into 'C:/Users/user/Documents/R/win-library/3.6'
## (as 'lib' is unspecified)

## Error in contrib.url(repos, "source"): trying to use CRAN without setting a mirror

library(ggplot2)
library(dplyr)

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

1. 파일 다운로드

library(readr)
lily <- read_csv("lily.txt")
View(lily)

2. 이 데이터의 열과 행 숫자를 파악하세요.

dim(lily)

## Error in eval(expr, envir, enclos): 객체 'lily'를 찾을 수 없습니다

3. 아버지에 관련된 데이터는 분석하지 않기로 결정하고, 아버지 관련 칼럼을 제외하여 lily2로 저장하세요.

lily %>% dplyr::select(lily$FAT_U)

## Error in eval(lhs, parent, parent): 객체 'lily'를 찾을 수 없습니다

3. 아버지에 관련된 대이터는 제외

lily2 <- lily %>% select(-FAT_U, -FAT_R)

## Error in eval(lhs, parent, parent): 객체 'lily'를 찾을 수 없습니다

4. 가장 많은 MOT_U가 있는 파일

lily2 %>% arrange(desc(MOT_U)) %>% head(1)

## Error in eval(lhs, parent, parent): 객체 'lily2'를 찾을 수 없습니다

5.

lily2 <- lily2 %>% mutate(MONTH = lily2$DAYS/31)

## Error in eval(lhs, parent, parent): 객체 'lily2'를 찾을 수 없습니다

6.

lily2$Group <- ifelse(lily2$MONTH < 23, "AGE1",
                      ifelse(lily2$MONTH < 36, "AGE2", "AGE3"))

## Error in ifelse(lily2$MONTH < 23, "AGE1", ifelse(lily2$MONTH < 36, "AGE2", : 객체 'lily2'를 찾을 수 없습니다

7.