멋쟁이천재사자

R Document 에는 없는데 동작하는 매개변수를 보신 적이 없으신가요? 1. plot(hc, hang = -1) hclust 설명서(?hclust)의 example 에 보면 매개변수 hang 의 차이를 알 수 있습니다. x 축에 글자들 달려있는 모양이 다릅니다. hc plot(iris,hang=-1) There were 50 or more warnings (use warnings() to see the first 50) > warnings() Warning messages: 1: In plot.window(...) : "hang"는 그래픽 매개변수가 아닙니다 2: In plot.xy(xy, type, ...) : "hang"는 그래픽 매개변수가 아닙니다 3: In title(...) : "hang"는..

dplyr 의 파이프(%>%) 연산자 다음에 와있는 {.->>xx} 도무지 무슨 기호일까요. {} 도 어렵고 . 도 어렵고 ->> 도 어렵습니다. 그래서 연구를 조금 해보았습니다. 1. ->> 와 % {.->>aa} %>% .$Species %>% table() iris %>% head() %>% {bb % table() 2. 쩜(.) 은 또 무엇인가요 다른 거 빼고 달랑 쩜만 찍어보았습니다. > iris %>% head() %>% . Error in .(.) : could not find function "." %>% 다음에는 함수(function)가 와야하는데 "." 은 함수가 아니야~ 라는 의미로 이해되네요 3. {.} {} 둘 다 비슷해보이는데 달랑 "." 만 사용하는 경우 에러가 나서 괄호로 묶..

paired t-test 와 일표본 t-test 는 동일합니다. 1. 샘플데이터 # 전후 데이터 before

9월 25일 26회 시험을 준비하고 있습니다. 문제 사회과학, 자연과학, 공학, 3개 학과의 평점 조사 표 평점 사회과학 자연과학 공학 1.5-2.5 15 25 10 2.5-3.5 60 69 77 3.5-4.5 24 6 14 학과와 성적이 관계있는지 검정하시오 1. 연구가설 귀무가설 작성(5) 2. 학과와 성적이 독립일 때 기댓값 구하시오(5) 3. 검정통계량 구하고 연구가설 채택여부 작성(5) 답안 1. 연구가설 귀무가설 작성(5) 귀무가설 : 학과와 성적은 관계가 없다 연구가설 : 학과와 성적은 관계가 있다 2. 학과와 성적이 독립일 때 기댓값 구하시오(5) m

9월 25일 26회 시험을 준비하고 있습니다. 23회 통계 파트 중 부호 검정 문제를 만들어서 풀어보았습니다. 1. 문제 (2022-08-30 update) 공장에서는 진공관 수명이 1만 시간이라고 주장하여 품질관리팀에서 12개 샘플을 뽑았음. 유의수준 5%에서 부호 검정하시오. 12개 샘플의 수명은 8800, 9500, 9600, 10000, 10400, 9600, 10300, 9500, 9600, 7100, 10000,7200 이다 1. 연구가설 귀무가설 작성(5) 2. 유효한 샘플의 수를 계산(5) 3. 검정통계량 및 연구가설 채택 여부 작성(5) 2. 답안 1. 연구가설 귀무가설 작성(5) 1만 시간이라는 공장의 주장은 1만 시간 이상이라는 주장이라고 이해할 수 있다. 귀무가설: 진공관 모집단의 ..

9월 25일 26회 시험을 준비하고 있습니다. 1. 문제 출처 : https://ckmoong.tistory.com/10?category=933194 다음 king 데이터로 시계열 분석을 실시하라. library(TTR) library(forecast) library(tseries) king https://robjhyndman.com/tsdldata/misc/kings.dat", skip=3) king.ts

9월 25일 26회 시험을 준비하고 있습니다. 25회 기출 문제 중 시계열 문제를 재구성하여 풀어보려고 합니다. 문제 다음은 2001년 1월부터 20년간 한국 방문 해외관광객 수(visistors)를 월별로 기록한 252 개 데이터이다 데이터 x는 아래 scipt 를 실행하여 생성하시오. library(sarima) library(dplyr) set.seed(5678) ss % mutate(no=row_number()) %>% mutate(visitors=100000+no*100+round(no*r*10)) %>% select(no, visitors) %>% mutate(visitors=ifelse(no %in% c(99,121,245),NA,visitors)) -> x 1. 주어진 데이터에 대해서 ED..

지난 5월 21일 25회 ADP 필기를 합격하고, 9월 25일 26회 실기를 준비하고 있습니다. 1. 기출 문제 (P관리도) 풀이 22회 기출문제 풀이 (22 회 P관리도 ) 를 해보았습니다. 나중에 여유가 되면 다른 유형의 관리도 문제도 만들어서 연습해 보려고 합니다. - 조의 숫자가 일정하지 않아 요철이 있는 케이스 2. 기출 문제 (시계열 문제) 풀이 25회 기출문제 ( [Adp 실기 기출 풀이] 25회 시계열 문제 ) 를 만들어서 풀이를 시작했습니다. 결측치가 3개가 있는 것을 단순히 NA 로 업데이트하여 문제를 만들었는데, 특정월이 빠진 형태의 문제도 만들어서 풀어보면 공부가 될 것 같습니다. auto.arima 의 결과가 ARIMA(0,1,1)(1,0,2)[12] 일때 어떤 의미인지 확인이 필..

9월 25일 26회 실기 시험을 준비하고 있습니다. 22회 기출 문제 중 통계분석 관리도 문제를 재구성하여 풀어보았습니다. 1. 문제 다음은 Lot별 200개에 대한 불량 제품 수량 데이터(Lot번호, 불량제품수)이다 데이터 x은 아래 scipt 를 실행하여 생성하시오. library(dplyr) set.seed(3312) round(rnorm(40, mean = 10, sd = 4)) %>% data.frame(errors=.) %>% mutate(lot=row_number()) %>% mutate(errors=ifelse(errors% select(2,1) -> x 1. 주어진 데이터 x를 이용하여 CL UCL LCL 을 각각 구하시오 2. 주어진 데이터 x에 대한 불량률 관리도(P관리도)를 시각화하..

지난 5월 21일 25회 ADP 필기를 합격했고, 9월 25일 첫 번째 실기를 준비하면서 기록한 내용입니다. 1. 기출 문제 복원 및 풀이 ※ ADP 실기 후기 링크 모음 (15,17, 18, 19, 20, 21, 22, 23, 24, 25회) No 문제 상세 (추가로 검토할 내용 등) 25 기계1. RFM 군집분석 기계2. 시계열 문제(유입관광객) 문제 생성 및 풀이 시작 sarima 통계1.여러통계문제 갈 때 4km/h로 가고 올 때 5km/h로 왔다면 왕복 평균 속도는? 연매출이 3000, 4000, 5000이었다면 연평균 몇배가 증가한 것인가? 통계2.조건부 확률(남성등산) 문제 풀이 과정에 대한 설명을 추가해야 할 듯 한데... 그냥 20 / (20 + 10)이렇게 풀어도 점수 줘요 (출처 : ..