collapse_noun.Rd
텍스트 문서에서 명사들을 토큰화한 후, 토큰화된 명사들을 공백으로 묶어서 텍스트 문서를 만듦 조회한다.
character. 명사로만 구성될 문서를 만들 대상 텍스트 데이터
mecab-ko 형태소 분석기의 사용자 정의 사전 파일. 기본값은 NULL로 사용자 사전파일을 지정하지 않음. 시스템 사전인 "/usr/local/lib/mecab/dic/mecab-ko-dic"(Linux, Mac)를 보완하여 사용됨. 사용자 사전 파일은 mecab-dict-index 명령어로 생성되며, 확장자가 "dic"임.
character. 토큰화할 명사의 유형을 지정. "noun", "noun2"중에서 선택. 기본값은 "noun"로 일반명사를 의미하며, "noun2"는 모든 명사를 의미함.
integer. 병렬 작업 수행 시 처리 단위인 chunk
integer. 병렬 작업 수행 시 사용할 코어의 개수
character. 명사로만 구성된 텍스트
MS-Windows에서는 병렬처리를 지원하지 않음
# \donttest{
collapse_noun(president_speech$doc[1:7])
#> [1] "우정 해 개막식 축하 행사 축하 참석 모두 환영 감사 인사 전 이웃 옛날 이웃 이웃 사정 통신사 절 시절 연락선 시대 항공기 하루 안 시대 교통 발달 통신 관계 경제 교류 말 협력 국음 마음 실행 가공 과학 기술 옛날 사이 불편 문제 생각 상황 양국 관계 불편 생존 자체 위협 사이 유감 친구 방법 관계 숙명 친구 관계 친구 친구 미래 적극 친구 손 불행 평화 번영 미래 관계 자리 양국 관계 도로 표현 전 경제 도로는 고속도 수준 정치 안보 측면 협력 도로 개통 문화 도로 길 길 위 장애물 양국 협력 관계 고속 도로 장애물 직시 양국 정부 국민 적극 노력 가슴 우정 불 자리 우정 불 양국 국민 사이 우정 계기 이틀 전 주최 행사 성공 성원 참석 격려 총리 국민 자리 감사 올해 양국 수교 해 일 양국 우정 성공 때 보람 생각 올해 이전 양국 국민 교류 국민 교류 해 감사"
#> [2] "각하 국민 신년 인사 새해 축복 해 기원 올해 양국 관계 발전 전기 중 교류 해 경제 학술 문화 체육 청소년 분야 행사 본격 국민 교류 협력 시대 나라 교역 상대국 투자 대상 국 한국인 방문 서로 문화 이웃 양국 우호 협력 올해 교류 행사 강화 각하 합의 전면 협력 동반자 관계 심화 평화 공동 번영 미래 기대 각하 건강 무궁 발전 기원"
#> [3] "존경 국민 오늘 사흘 방문 취임 전후 긴박 상황 생각 정세 관계 정상 회담 변화 사실 다행 오늘 참여 정부 대북 정책 성원 국민 진심 감사 국민 이번 정상 회담 실용 회담 정상 회담 관계 길 이번 회담 길 장애물 지체 발걸음 재촉 회담 의제 논의 평화 정착 경제 발전 실질 구체 진전 주력 비핵화 문제 평화 체제 궁극 합의 해결 일 기본 방향 설정 속도 남 북 의지 중요 생각 이번 회담 자 회담 성공 촉진 평화 기여 회담 최선 경제 협력 진전 장애 국제 요인 인식 차이 기인 장애 장애 극복 본격 경제 협력 속도 인식 차이 극복 노력 집중 군사 신뢰 구축 인도 문제 구체 합의 최대한 노력 국민 이번 회담 국민 요구 기대 국민 전문가 제안 의제 부처 제안 의제 정상 회담 추진 위원회 검토 의제 의제 국민 기대 최대한 의제 반영 결과 심정 만남 과제 소화 임기 고려 이번 회담 논의 성사 일 한계 시기 걸음 걸음 중요 생각 욕심 몸 금기 두지 역사 책임 몫 시기 상황 냉정 판단 토대 책임 최선 합의 설득 설득 타협 타협 합의 상호 인식 차이 신뢰 중요 성과 확신 틀 생각 남 북 길 국민 북녘 땅 출발 이틀 후 결과 성원 당부 감사"
#> [4] "마중 감사 시간 도착 저녁 임기 얼마 처지 약속 얼마 임기 안 마무리 다음 정부 고심 생각 시기 중요 시기 시기 일 다음 정부 지금 기회 일 시간 뒤 생각 반대 대신 문제 해결 문제 해결 주문 주문 주문 소화 걱정 반영 노력 일거리 걸음 일 성사 걱정 발걸음 보따리 만남 자체 의미 이해 욕심 자락 준비 보따리 보자기 일거리 길 보자기 성과 보자기 짐 성과 생각 국민 성원 덕분 조언 제안 논거 준비 성과 생각 사람 참모 일 성과 점 조언 물론 성원 국민 감사 감사 해외 때 때 연설 박수 환영 박수 부담 생각 습관 이번 북녘 동포 환영 처음 부담 거리 표정 부담 남녘 사람 북녘 사람 자유 소망 가슴 위원장 처음 위원장 회담 잠 느낌 사고방식 차이 벽 합의 눈앞 느낌 기대 통일부 장관 북측 회담 위로 본시 군기 처음 군기 말 기세 싸움 뜻 국방 위원장 그때 실망 용기 격려 기대 오전 오후 말씀 말 통 불만 마음 핵 문제 비핵화 합의 기본 원칙 합의 핵 문제 국제 문제 실질 구체 문제 자회 담 핵 문제 해결 말 문제 해결 타작마당 타작마당 벌 얘기 부담 생각 얘기 확인 회담 분위기 부담 보도 비핵화 기존 합의 확인 자 회담 장 지금 앞 협의 협력 공동 명과 합의 이행 말 핵 폐기 자회 담 정리 위원장 핵 문제 공동 명과 합의 이행 점 비핵화 공동 선언 중요 선언 앞 원칙 확인 점 확인 최고 지도자 핵 폐기 의지 이행 문제 생각 자회 담 북측 표현 상당 양보 평가 정상 회담 시점 정상 회담 성공 협력 점 정상 회담 자 회담 진전 기여 북측 성 노력 감사 회담 도중 위원장 자 회담 북측 수석대표 외무성 부상 회담장 공동 성명 합의 경과 설명 구체 보고 자 회담 진행 장애 핵 문제 확신 핵 문제 평화 체제 정부 방침 평화 체제 종전 협정 평화 협정 순서 동시 절차 문제 관련 앞 원칙 주도 관련 당사국 평화 체제 협의 협력 당사자 협의 시작 협의 각국 제안 기본 합의 과정 일환 대통령 제안 종전 선언 방안 위원장 설명 위원장 종전 체제 평화 체제 전환 기본 동의 뜻 이전 한미 논의 종전 선언 방 안 구체 관심 표명 성사 남측 노력 주문 추진 취지 선언문 표현 앞 당사국 대화 문제 북측 용의 점 평화 정착 경제 협력 확대 협력 질서 구축 미 일 관계 개선 필요 점 강조 협력 제안 점 위원장 합의 말 합의 사항 점 중요 차례 강조 말씀 위원장 경청 앞 핵 문제 해결 관계 개선 평화 체제 논의 본격 분단 반세기 냉전 체제 굴레 평화 시대 기대 판단 군사 긴장 완화 분쟁 문제 대화 협상 해결 합의 전쟁 반대 불가침 의무 준수 뜻 서해 평화 정착 군사 대결 관점 경제 협력 관점 서해 문제 발상 전환 필요 점 강조 서해 공 동어 구역 해 상평 공원 해주 공단 개발 개성 공단 연결 하구 공동 이용 대결 상태 해소 평화 구축 경제 협력 포괄 해결 방안 평화 협력 특별 지대 방안 제의 위원장 참모 상 다음 제안 원칙 수용 의사 정상 선언 포함 설명 이번 공동 선언 핵심 진전 합의 부분 평화 협력 특별 지대 합의 남 우발 충돌 방지 공동 어로수역 지정 수역 평화 수역 방안 협력 사업 군사 보장 조치 문제 군사 신뢰 구축 조치 협의 금년 국방 장관 회담 개최 합의 다음 경제 협력 말씀 이번 회담 경제 협력 준비 실질 회담 시간 할애 대화 논의 개성 공단 개발 그동안 진전 북측 입장 부담 불편 점 불만 점 위원장 경협 일방 양측 모두 필요 경제 협력 중요 문제 점 강조 기업 대북 투자 희망 기업 얘기 경제 협력 일방 지원 머리 회담 방향 대화 때 북측 자존심 일 문제 공동 이익 남측 기대 사람 강조 얘기 점 이해 동안 개성 공단 지역 성공 이외 지역 경협 실패 지지부진 점 설명 장애 요인 해소 기업 안심 투자 안정 기업 활동 체제 중요 점 강조 경협 장애 요인 해결 시간 절차 해결 개성 공단 개발 방식 법 제도 인프라 문제 일괄 해결 제안 강조 기업 원활 경영 활동 기술 이전 경협 지속 발전 사람 사람 소통 중요 합의 사항 예측 가능 점 강조 기업 시장 경제 원칙 아래 활동 제도 장치 마련 당국 합의 경협 사업 군사 보장 점 강조 기업 관계 상황 변화 핵 문제 해결 미 관계 개선 국제 관계 안정 관리 점 강조 토대 위 상호 보완 공동 번영 구상 준비 경제 협력 체계 미래 지향 방향 발전 제안 이번 회담 위원장 대화 앞 경협 발전 필요 과제 인식 공감대 다행 일 생각 실질 문제 합의 말씀 평화 협력 특별 지대 개발 평화 정착 도움 어민 기업 직접 혜택 평화 번영 프로젝트 해주 지역 특별 지대 설정 개성 관계 관계 경제 시너지 효과 생각 밖 논의 각종 경협 사업 정상 합의 이례 구체 합의 성과 생각 구체 합의 끝 앞 총체 문제 경제 협력 합의 사항 이행 문제 해결 부총리 급 공동 위원회 운영 합의 실무 선 해결 문제 문제 제기 해결 해결 문제 해결 기구 생각 사업 제안 합의 계속 토대 생각 이번 합의 경협 수준 차원 중소기업 기회 제공 경제 활동 영역 계기 생각 취임사 평화 번영 평화 번영 얘기 평화 문제 일반 경제 번영 문제 경제 구조 조정 문제 사이 어려움 경제 활로 계기 말 이번 기틀 생각 북방 경제 얘기 얘기 주장 불안감 이번 합의 기초 앞 협력 관계 속 발전 북방 경제 말 이름 앞 이름 경제 계기 생각 경제 협력 평화 구축 평화 경제 협력 뒷받침 선 순환 구조 생각 경제 상생 경제 실현 평화 번영 시대 디딤돌 기대 화해 통일 문제 대화 분야 양측 제기 사항 정치 분야 사실 화해 단계 과거 자유 말 이산가족 국군 포로 문제 근본 해결 제의 이산가족 문제 문제 점 강조 위원장 공감 이산가족 상봉 확대 영상 편지 교환 사업 추진 면회소 완공 쌍방 대표 상주 이산가족 상봉 상시 진행 합의 문제 양측 입장 차이 국민 기대 성과 합의 대화 다음 문제 밑거름 바람 이번 해결 국민 생각 앞 기회 대화 기회 문제 해결 노력 민족 역사 우수 문화 역사 언어 교육 문화 예술 체육 사회 문화 분야 교류 협력 발전 경기 대회 응원단 경의선 열차 이용 참가 정상 회담 개최 정상 회담 정례 제안 국가 정상 선례 문제 때 관계 발전 정상 현안 문제 협의 정도 합의 요구 회담 안정 운영 그동안 장관 급 운영 대화 총괄 창구 총리 급 격상 회의 금년 위원장 답방 요청 위원장 최고 민회 상임 위원장 방문 제안 본인 방문 여건 성숙 때 말 통일 문제 기본 공동 선언 정리 평가 이념 추상 논의 현실 실질 접근 문제 인식 이번 합의 내용 진전 정상 결국 통일 과정 방향 논의 논의 과정 여론 조사 결과 예 국민 동서 독과 통일 상호 공존공영 점진 통일 접근 인식 점 설명 회담 때 문제 거론 외세 공조 민족 공조 문제 쟁점 정부 자주 정부 점 설명 자주 수준 그동안 노력 설명 자주 강조 나라 대화 협력 필요 때 항의 항의 수용 전 과정 배제 고립 점 설명 앞 발전 고립 세계 적극 자주 수준 수준 문제 제안 점 위원장 이해 동행 특별 수행원 단상 분야 북측 간담회 대화 대화 소통 유익 짐작 국민 관계 단계 진입 평화 체제 전환 제도 노력 군사 긴장 완화 실질 노력 시작 경협 전체 무대 발전 경제 공동체 건설 걸음 모두 국민 성원 덕분 생각 감사 말씀 동안 관계 역사 때 합의 중요 합의 실천 일 중요 생각 앞 정부 이번 합의 충실 이행 북측 최선 예정 총리 급 회담 국방 장관 회담 구체 이행 방안 마련 이후 이행 과정 준비 과정 마찬가지 국민 의견 수렴 투명 진행 이번 합의 사항 특정 정당 후보 불리 유리 생각 문제 합의 찬성 불리 합의 반대 불리 일 합의 자체 유리 불리 합의 태도 후보 전략 자체 유리 불리 합의 유리 불리 생각 긴박 주변 정세 변화 정부 시기 역사 과업 수행 생각 합의 기본 합의서 공동 선언 합의 내용 실천 과정 이상 생각 참여 정부 임기 얼마 합의 내용 구체 실천 기본 토대 마련 최선 생각 다음 정부 부담 공동 선언 다음 정부 관계 평화 공동 번영 토대 일 생각 확신 임기 동안 최선 노력 설명 알맹이 느낌 생각 알맹이 선언문 선언문 내용 설명 배경 설명 보고 껍데기 느낌 지금 공동 선언문 보따리 확인 남측 경제 북측 경제 공업 지대 중요 생각 조선업 돌파구 계기 공업 전후방 연관 효과 생각 중요 생각 개수 북측 부담 점 생각 공세 요구 무리 생각 앞 총리 회담 부총리 급 경제 협력 위원회 논의 생각 얘기 선언문 말씀 선언문 생각 배경 설명 국민 감사 자리 격려 감사"
#> [5] "존경 민간 자문 위원회 위원장 비즈니스 투자 정상 회의 조직 위원장 자리 경제 지도자 안녕 자리 초대 감사 자리 기업 인간 교류 협력 증진 세계 경제 역내 기업 협력 시점 회의 회의 역내 기업 인간 유대 서로 지혜 기회 세계 경제 활력 계기 기대 존경 참석자 각국 지도자 중반 창설 결속 이후 무역 투자 자유 정책 역동 성장 지속 지역 세계 개도국 모범 모델 제시 결실 언어 문화 경제 발전 단계 차이 극복 성취 역내 경제 통합 회원국 단계 자유 무역 지대 실현 계획 작년 말 관세 인하 목표 달성 역내 완전 무관세 목표 매진 이번 비즈니스 투자 정상 회의 그동안 성장 통합 결실 민간 부문 확산 중요 계기 확신 경제 지도자 국가 세계사 소용돌이 경험 우의 협력 역사 대전 이후 식민주의 항거 독립 역사 공유 독립 후 반세기 지속 냉전 체제 강대국 틈바구니 자존 번영 추구 시기 경험 분단 전쟁 고통 때 나라 물심 양면 국제 무대 적극 지원 후반 경제 위기 풍파 극복 국민 친구 우정 간 나라 산업 연수생 협력 증진 체류 산업 연수생 절반 가까이 국가 젊은이 경제 도움 해당 국과 이해 증진 기여 정부 외국인 근로자 처우 개선 인권 보호 노력 올해 말 외국인 고용 허가 법 제정 외국인 근로자 취업 기간 동안 내국인 동등 대우 제도 보장 제도 아래 인 교류 산업 인력 협력 활성 희망 경제 발전 경험 국가 자체 추진 통합 지원 노력 지속 정보 경험 성과 공유 역내 정보 격차 해소 지원 정부 앞 연간 규모 개발 협력 단 파견 예정 내년 규모 개발 협력 단 국가 중심 파견 젊은이 자국 미래 지원 세기 서로 중요 교역 투자 파트너 교역 규모 지난해 기록 서로 교역 상대국 올해 상반기 지역 투자 전체 투자 유입 액 차지 계 상호 보완 협력 분야 지난해 관광객 국가 방문 정도 국민 지역 정도 결과 만족 지금 신뢰 협력 바탕 관계 세기 포괄 동반자 관계 발전 존경 참석자 오늘 내일 국가 지도자 비전 논의 토대 중 장기 협력 방안 구체 그동안 정치 외교 분야 진행 협의 채널 경제 통상 분야 확대 구체 내년 간 경제 장관 회의 고위 경제 관리 회의 신설 정례 무역 투자 활성 미래 지향 경제 협력 관계 발전 중심 통합 움직임 적극 동참 개최 정상 회의 추진 방 안 구상 계획 경제 통합 인근 국가 포괄 경제 협력 관계 구축 노력 주목 동안 전체 협력 통합 노력 비전 그룹 연구 그룹 제안 그룹 수년 동안 참여 협조 아래 성공 연구 진행 연구 그룹 지역 정체 공동체 의식 협력 조치 권고 협력 조치 포럼 개최 예정 자리 역내 회원국 산 관 학 대표 참석 평화 번영 진보 협력 방안 논의 노력 통합 기여 전체 결속 강화 이바지 재무 장관 회의 추진 역내 금융 협력 적극 참여 세기 성장 산업 분야 협력 방안 적극 모색 존경 경제 지도자 지역 지정학 위치 기반 지역 협력 확대 적극 기여 나라 개방 경제 중심 도약 장기 목표 적극 역할 기여 전체 공동 번영 도모 계획 목표 경제 투명 공정 효율 시장 경제 시스템 기업 회계 지배 구조 금융 노사 관계 경제 전 분야 글로벌 스탠더드 개선 국제공항 인프라 확충 교류 확대 기여 인근 지역 자유 비즈니스 활동 가능 경제 자유 지역 조성 계획 궁극 목표 세계 나라 투자 나라 강조 동북 아만 중심 지역 협력 추구 지역 역할 증대 동시 국가 협력 강화 전체 번영 결속 기여 존경 경제 지도자 핵 문제 걱정 압 군사 긴장 대립 전체 안정 번영 장애물 핵 문제 평화 해결 남북한 평화 체제 정착 평화 번영 필수 요소 핵 문제 해결 평화 해결 다행 자 회담 성사 핵 문제 평화 해결 길 장래 회담 결과 기대 핵 포기 경우 국제 사회 협력 개혁 개방 길 필요 지원 핵 문제 평화 해결 노력 경제 지도자 지속 관심 성원 당부 존경 지역 경제 지도자 앞 세기 도전 기회 교차 제국주의 시대 냉전 시기 억압 대결 역사 종언 지역 세계 경제 축 부상 지역 발전 가능 협력 여지 곳 도전 심화 경쟁 구도 속 번영 역내 협력 강화 지역 개방 협력 질서 진전 토대 지역 협력 강화 실질 주역 기업 오늘 만남 계기 각국 경제 계간 협력 활성 노력 힘 노력 회원국 세계 경제 성장 견인차 세기 시대 경청 감사"
#> [6] "존경 배리 반부 패국 제회 의장 국제 투명 기구 회장 반 부패 분야 지도자 전문가 외귀 반 부패 국제 회의 개막 축 국제기구 세계 참가자 진심 환영 반 부패 국제 회의 동안 반 부패 국제 협력 노력 세계 최대 반 부패 분야 민 관 연대 회의 성장 회의 국민 모두 기쁨 이번 행사 수고 관계자 감사 말씀 회의 국제 투명 기구 경의 표 국제 청렴 부패 발취 재상 수상 축하 인사 외귀 간 양 성장 서구 선진국 산업 반세기 분단 전쟁 폐허 위 양속 성장 부작용 정경 유착 관치 금융 초래 부패 문제 대표 예 외환 위기 국민 양 성장 투명 공정성 확립 과제 변화 추구 출범 참여 정부 지속 개혁 질 성장 토대 구축 원칙 신뢰 공정 투명 대화 타협 분권 자율 문화 사회 구석구석 목표 출발점 시대 잘못 관행 정상 중요 부패 척결 투명 증진 참여 정부 부패 사회 실현 주요 국정 과제 정부 노력 이유 정치 변화 시작 대통령 선거 역대 선거 공정 정치 변화 시대 대세 자리 시장 개혁 투명 공정 경쟁 보장 시장 핵심 각종 제도 관행 글로벌 스탠더드 개선 부패 빌미 제공 필요 규제 철폐 행정 투명 청렴 과제 추진 전자 정부 구현 공직자 자발 개혁 참여 투명 정부 원동력 회의 온라인 민원 처리 시스템 부패 방지 우수 사례 발표 정부 반 부패 국제 협력 적극 동참 국제 투명 기구 활동 협력 존경 참석자 이번 회의 경험 지혜 투명 사회 노력 힘 지구촌 후손 부패 미래 견인차 역할 토론 결과 경청 이번 회의 부패 문제 해결 투명 증진 방향 제시 자리 부패 사회 국민 노력 확인 기회 기대 신록 동안 보람 여정 감사"
#> [7] "존경 트 총리 총리 사무총장 국제기구 각국 대표 지역 총회 개회 축 국제기구 참석자 진심 환영 태 총회 간 노동자 인권 보호 권익 신장 기여 공헌 감사 회의 생각 이번 회의 주관 관계자 모두 감사 말씀 내외 귀빈 세계 지식 정보 진전 개인 국가 혜택 개방 경쟁 촉진 무역 자유 가속 부 창출 원천 정보 통신 기술 발달 지역 통합 강화 국가 상호 의존 협력 필요 환경 인권 지구 문제 해결 긍정 영향 태 지역 무역 자유 회원국 경제 성장 국민 후생 증진 기여 평가 경제 전망 보고서 지난해 성장 기록 세계 경제 선도 역사 문화 인 자원 잠재력 발휘 앞 비약 발전 참석자 세계 성과 주목 점 혜택 공평 배분 경제 주체 경쟁력 차이 지역 국가 계층 격차 경제 양극 현상 현상 가속 장기 성장 잠재력 노동 시장 구조 양극 심화 근로자 소득 격차 빈곤층 증대 사회 갈등 지속 가능 성장 부정 영향 태지 역도 양극 도전 직면 실업 고용 성장 지속 청년 실업 문제 이상 실업 배 실정 일자리 부족 근로 취약 계층 고용 안정 근로 조건 일 문제 하루 소득 미만 근로 빈곤층 세계 차지 점 양질 일자리 창출 주제 이번 총회 의미 서로 경험 지혜 방안 제시 기대 내외 귀빈 외환 위기 극복 최근 성장 계속 시장 경쟁 심화 경제 주체 지식 정보 격차 확대 기업 중소기업 정규직 비정규직 소득 계층 격차 격차 심화 소비 위축 내수 시장 침체 투자 감소 양질 일자리 축소 비정규직 근로자 확대 악순환 문제 해결 핵심 일자리 일자리 근본 양극 극복 대책 일자리 일자리 질 일자리 중소기업 활성 정책 역량 집중 중소기업 협력 관계 구축 혁신 중소기업 육성 금융 지원 체계 개편 중소기업 정책 근본 혁신 고용 창출 효과 서비스 산업 다양 고급 고학력 청년 실업 문제 해결 금융 법률 회계 컨설팅 지식 기반 서비스 산업 적극 육성 국민 삶 질 직결 보건 복지 교육 문화 사회 서비스 일자리 지난해 고용 지원 서비스 직업 능력 개발 결합 선진 고용 정망 구축 국가 전략 과제 선정 집중 투자 일 사람 능력 개발 기회 각자 일자리 제공 일 능력 사람 필요 사회 안전망 기능 강화 사회 보장 예산 배 이상 노인 저소득층 복지 증진 비정규직 영세자 영업자 사회 보험 혜택 확대 정책 추진 국제 기준 부합 노사 관계 선진 방안 추진 비정규직 근로자 장애 여성 취약 계층 차별 시정 노력 정부 정책 한계 기업 장기 안목 경영 전략 사람 노동조합 비정규직 노동자 전체 관점 생각 양보 양보 대화 타협 합의 생산 합의 내용 책임 실천 일자리 존경 참석자 인력 자본 자유 세계 시대 일자리 문제 나라 문제 국가 협력 관련 국제기구 전략 파트너 강화 필요 이번 총회 계기 기대 동안 보람 시간 감사"
# Collaboration with tidytext
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
nho_noun <- president_speech %>%
filter(president %in% "노무현") %>%
filter(stringr::str_detect(category, "^외교")) %>%
mutate(doc_noun = collapse_noun(doc)) %>%
tidytext::unnest_ngrams(
noun_bigram,
doc_noun,
n = 2
)
nho_noun
#> # A tibble: 44,117 × 8
#> id president category type title date doc noun_…¹
#> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr>
#> 1 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 우정 해
#> 2 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 해 개…
#> 3 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 개막식…
#> 4 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 축하 …
#> 5 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 행사 …
#> 6 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 축하 …
#> 7 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 참석 …
#> 8 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 모두 …
#> 9 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 환영 …
#> 10 DOC_0001 노무현 외교-통상 치사 "2005 한일 우정의 해 … 2005… " … 감사 …
#> # … with 44,107 more rows, and abbreviated variable name ¹noun_bigram
nho_noun$noun_bigram[1:5]
#> [1] "우정 해" "해 개막식" "개막식 축하" "축하 행사" "행사 축하"
# }