혹시 생성자 메서드를 사용하지 않고 Init 메서드를 만들어서 사용하는 특별한 이유가 있나요? 그냥 코딩 스타일인가요?

for (i in 8:12) {                                  q_lda <- LDA(dtm, k=i)                  q_topics <- tidy(q_lda, matrix="beta")                 q_top_terms <- q_topics %>%                                 group_by(topic) %>%                                 top_n(15, beta) %>%                                 ungroup() %>%                                 arrange(topic, -beta)                 q_top_terms$term<-repair_encoding(q_top_terms$term)                 tau<-tapply(q_top_terms$term,q_top_terms$topic,table)                           png(paste0("nate",i,".png"),width=500,height = 500)                 q_top_terms %>%                                 mutate(term=reorder(term, beta)) %>%                                 ggplot(aes(term, beta, fill=factor(topic))) +                                 geom_col(show.legend=FALSE) +                                 facet_wrap(~ topic, scales="free") +                                 coord_flip() +                                 theme(axis.text.y=element_text(family="HYGothic-Extra"))                                  dev.off()                                  key<-c(sapply(tau,names))                 key_list[[i]]<-key[!key %in% stw] } 이렇게 코드를 돌리면, 파일은 생기는데, 이미지는 저장되지 않습니다. 왜 그런건가요?

마무리 Review강의가 실행되지 않는데 문제가 생긴건가요?