주식
Posts
225 posts
BC카드 페이북 주식챌린지 국내 주식 100만원 나눠갖기
페이북 주식챌린지 라고 하는 이벤트를 알고 계시는지요? 재미 삼아 해 보았는데 이게 아주 쉽고 재미나더라구요. 방법은 주식시장이 열리는 날에 전날 5개의 주식 종목 중에서 가장 상승 할 것 같은 종목을 맞추게 되면 100만원을 나누어 가질 수 있는 그런 이벤트 입니다. 일단 이 이벤트에 참여하기 위해서는 페이북 어플을 설치하셔야 하구요. 저는 BC카드가 기존에 있어서 연결을 해보았는데, 언제든 참여 할 수 있는 재미난 이벤트 입니다. 먼저 페이북을 아직 설치하지 않으셨다면 한번 설치를 해 보세요. 스마트폰에서 구글플레이나 앱스토에서 검색해서 설치하시면 되구요. 앱 접근 권한을 확인 해 주시면 자세한 안내를 받을 수 있습니.......

개미가 타고 있어요 티빙 출연진 등장인물 몇부작
개미가 타고 있어요 티빙 출연진 등장인물 몇부작 제목이... 주식 하는 분들이라면 짜증날만한 제목^^... 8월 12일 금요일날 티빙 오리지널로 첫 방송되는 드라마라고 한다. 주식을 하고 있는 분들은 공감을 하면서 보실 수 있는 그런 작품이 아닐까 생각함. 관심 있으신 분들은 내일 첫방이니까 한 번 시청해보시는 것도 나쁘지 않을 것 같다. 그럼 이번 포스팅을 통해 개미가타고있어요 라는 드라마에 대해 자세히 알아보도록 하자. 출연진으로 누가 나오는지, 총 몇부작으로 구성되어있는지 등장인물로 어떤 캐릭터들이 나오는지 궁금해진다. 참고로 TVING에 회원 가입 뿐만 아니라 정액제 회원이어야지 볼 수 있는 드라마. 개미가 타고 있어.......
R을 이용한 회사 재무 정보 수집하기
getTable <- function(url=url){ tem <- read_html(url,encoding = "UTF-8") dat <- tem %>% html_nodes(".bus_board_txt1") %>% html_text tit <- tem %>% html_nodes('.bus_board_tit1') %>% html_text tit <- stri_trim_both(tit) tit <- tit[1:(which(nchar(tit)==0)[2]-1)] tit <- gsub(" ","",tit) tit <- gsub("[u00A0]","",tit) year <- tit[-1] dat

