rm(list = ls())
date()
## [1] "Sat Feb 8 02:00:19 2025"
sessionInfo()
## R version 4.4.2 (2024-10-31)
## Platform: x86_64-apple-darwin20
## Running under: macOS Ventura 13.7.3
##
## Matrix products: default
## BLAS: /Library/Frameworks/R.framework/Versions/4.4-x86_64/Resources/lib/libRblas.0.dylib
## LAPACK: /Library/Frameworks/R.framework/Versions/4.4-x86_64/Resources/lib/libRlapack.dylib; LAPACK version 3.12.0
##
## locale:
## [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
##
## time zone: Europe/Moscow
## tzcode source: internal
##
## attached base packages:
## [1] stats graphics grDevices datasets utils methods base
##
## loaded via a namespace (and not attached):
## [1] digest_0.6.36 R6_2.5.1 fastmap_1.2.0 xfun_0.49
## [5] cachem_1.1.0 knitr_1.49 htmltools_0.5.8.1 rmarkdown_2.27
## [9] lifecycle_1.0.4 cli_3.6.3 sass_0.4.9 renv_1.0.11
## [13] jquerylib_0.1.4 compiler_4.4.2 rstudioapi_0.16.0 tools_4.4.2
## [17] evaluate_1.0.1 bslib_0.7.0 yaml_2.3.10 jsonlite_1.8.8
## [21] rlang_1.1.4
Билиотеки
library(dplyr)
library(quanteda)
library(ggplot2)
library(stringr)
library(quanteda.textplots)
library(quanteda.textstats)
Загрузка объектов
#load(file = "Corpus_S.Rdata")
load(file = "Tokens_S.Rdata")
load(file = "Dictionary.RData")
load(file = "Tokens_S3.Rdata")
Для анализ объединенил три текста по разным картинкам от одного изспытуемого в один. Частотный анализ логичнее провести по испытуемым, а не текстам. Какие слова использовал испытуемый хотя бы по одной из картинок.
Полный список слов c обозначением части речи:
nrow(Dictionary)
## [1] 1938
Dictionary |>
select(-Word_POS) |>
arrange(Word)
## Word POS
## 1 а CONJ
## 2 а S
## 3 а PART
## 4 абсолютно ADV
## 5 авантюра S
## 6 авторитарный A
## 7 авторитет S
## 8 ага PART
## 9 агрессивный A
## 10 агрессия S
## 11 адекватно ADV
## 12 адекватный A
## 13 активно ADV
## 14 алкоголь S
## 15 алкогольный A
## 16 ама S
## 17 америка S
## 18 американский A
## 19 анекдот S
## 20 анна S
## 21 аннабель S
## 22 антипатия S
## 23 анфас ADV
## 24 аня S
## 25 ассоциация S
## 26 ассоциировать V
## 27 афиша S
## 28 б PART
## 29 баба S
## 30 бабушка S
## 31 бандит S
## 32 бант S
## 33 бедный A
## 34 бежать V
## 35 без PR
## 36 безмолвный A
## 37 безопасность S
## 38 безразличие S
## 39 безразличный A
## 40 безучастный A
## 41 безысходность S
## 42 белый A
## 43 белье S
## 44 беременный A
## 45 берлога S
## 46 беседа S
## 47 беседовать V
## 48 беспокоиться V
## 49 беспокойный A
## 50 беспокойство S
## 51 бестактность S
## 52 биологический A
## 53 бить V
## 54 благодаря PR
## 55 близкие S
## 56 близкий A
## 57 близко ADV
## 58 бля INTJ
## 59 блядушник? S
## 60 богатый A
## 61 боже S
## 62 бой S
## 63 более ADV
## 64 болеть V
## 65 болтать V
## 66 боль S
## 67 больница S
## 68 больной S
## 69 больше ADV
## 70 большинство S
## 71 большой A
## 72 бордель S
## 73 бормотать V
## 74 бороться V
## 75 борьба S
## 76 бояться V
## 77 брак S
## 78 брат S
## 79 братик S
## 80 брать V
## 81 бровь S
## 82 бросать V
## 83 будто CONJ
## 84 будто PART
## 85 будущее S
## 86 будущий A
## 87 бы PART
## 88 быстро ADV
## 89 быть V
## 90 в PR
## 91 важность S
## 92 важный A
## 93 вакансия S
## 94 вариант S
## 95 вариация S
## 96 ваш APRO
## 97 вблизи ADV
## 98 вглядываться V
## 99 вдаль ADV
## 100 вдвоем ADV
## 101 вдруг ADV
## 102 ведь PART
## 103 ведь CONJ
## 104 везти V
## 105 веревка S
## 106 вернее ADV
## 107 вернуть V
## 108 вернуться V
## 109 верный A
## 110 вероятно ADV
## 111 вероятный A
## 112 версия S
## 113 веселие S
## 114 веселиться V
## 115 весело ADV
## 116 веселый A
## 117 вести V
## 118 весь APRO
## 119 вечер S
## 120 вещество S
## 121 вещь S
## 122 взаимодействие S
## 123 взаимодействовать V
## 124 взаимоотношение S
## 125 взаимоотношения S
## 126 взволнованно ADV
## 127 взгляд S
## 128 взглядывать V
## 129 вздыхать V
## 130 взрослый A
## 131 взрослый S
## 132 взять V
## 133 взяться V
## 134 вид S
## 135 видеть V
## 136 видеться V
## 137 видимо ADV
## 138 виднеться V
## 139 видно ADV
## 140 видный A
## 141 вина S
## 142 виноватый A
## 143 висеть V
## 144 вить V
## 145 вкладка S
## 146 вкладывание S
## 147 вкладывать V
## 148 влюбленный A
## 149 влюблять V
## 150 вляпываться V
## 151 вляться? V
## 152 вместе ADV
## 153 вмешиваться V
## 154 вне PR
## 155 внешний A
## 156 вникать V
## 157 внимание S
## 158 внимательно ADV
## 159 внимать V
## 160 внук S
## 161 внучка S
## 162 внушать V
## 163 во PR
## 164 во-первых ADV
## 165 возвращаться V
## 166 возле PR
## 167 возлюбить V
## 168 возлюбленная S
## 169 возлюбленный A
## 170 возможно ADV
## 171 возможность S
## 172 возможный A
## 173 возмущение S
## 174 возникать V
## 175 возраст S
## 176 возрастной A
## 177 война S
## 178 волнение S
## 179 волноваться V
## 180 волос S
## 181 воля S
## 182 вон PART
## 183 вообще ADV
## 184 вообще-то ADV
## 185 вопрос S
## 186 вопросительный A
## 187 воспитание S
## 188 воспитанница S
## 189 воспитывать V
## 190 воспринимать V
## 191 восстанавливать V
## 192 восхищаться V
## 193 восхищение S
## 194 вот PART
## 195 вот-вот ADV
## 196 впервой ADV
## 197 вполне ADV
## 198 вранье S
## 199 врать V
## 200 вредный A
## 201 время S
## 202 вроде PR
## 203 вроде PART
## 204 вряд ADV
## 205 все SPRO
## 206 все ADV
## 207 все-таки PART
## 208 всегда ADVPRO
## 209 вскакивать V
## 210 вспыльчивость S
## 211 вставать V
## 212 встреча S
## 213 встречать V
## 214 встречаться V
## 215 встряхивать V
## 216 вступать V
## 217 вступительный A
## 218 всячески ADV
## 219 второй ANUM
## 220 вы SPRO
## 221 выбегать V
## 222 выбирать V
## 223 вывод S
## 224 выглядеть V
## 225 выдумывать V
## 226 выигрывать V
## 227 выкуривать V
## 228 вылавливать V
## 229 выливать V
## 230 выпадать V
## 231 выпивать V
## 232 выполнять V
## 233 выражение S
## 234 вырываться V
## 235 высказываться V
## 236 выслуживать V
## 237 выслушивать V
## 238 высматривать V
## 239 высокий A
## 240 выставлять V
## 241 выступать V
## 242 высыпаться V
## 243 выход S
## 244 выходить V
## 245 выяснение S
## 246 выяснивать V
## 247 выяснять V
## 248 где ADVPRO
## 249 где-то ADVPRO
## 250 героиня S
## 251 герой S
## 252 главный A
## 253 глаз S
## 254 глобальный A
## 255 глупость S
## 256 глупый A
## 257 гнев S
## 258 говорить V
## 259 год S
## 260 голова S
## 261 головной A
## 262 голый A
## 263 гольцман S
## 264 гордый A
## 265 горничная S
## 266 горничный A
## 267 горький A
## 268 господи INTJ
## 269 гостевой A
## 270 гостиная S
## 271 гостиница S
## 272 гость S
## 273 готовить V
## 274 готовиться V
## 275 готовый A
## 276 граница S
## 277 грубо ADV
## 278 грубый A
## 279 грудь S
## 280 грустить V
## 281 грустненький? A
## 282 грустно ADV
## 283 грустный A
## 284 грусть S
## 285 грызть V
## 286 губа S
## 287 гувернантка S
## 288 гулять V
## 289 да CONJ
## 290 да PART
## 291 давать V
## 292 давить V
## 293 давление S
## 294 давно ADV
## 295 даже PART
## 296 даже CONJ
## 297 далее ADV
## 298 далеко ADV
## 299 дальнейший A
## 300 дама S
## 301 данный A
## 302 два NUM
## 303 двенадцать NUM
## 304 дверь S
## 305 двигаться V
## 306 движение S
## 307 двинуться V
## 308 двое NUM
## 309 двойка S
## 310 двор S
## 311 девочка S
## 312 девушка S
## 313 действие S
## 314 делать V
## 315 делиться V
## 316 дело S
## 317 деловой A
## 318 демонстративный A
## 319 день S
## 320 держать V
## 321 держаться V
## 322 дернуть V
## 323 деспотичный A
## 324 десять NUM
## 325 деталь S
## 326 детский A
## 327 джаз S
## 328 джентльмен S
## 329 диалог S
## 330 диван S
## 331 диванчик S
## 332 для PR
## 333 дневник S
## 334 до PR
## 335 добиваться V
## 336 добрый A
## 337 доверять V
## 338 довольно ADV
## 339 довольный A
## 340 догнать V
## 341 додавливать? V
## 342 докапываться V
## 343 долг S
## 344 долго ADV
## 345 долгоиграющий A
## 346 должно ADV
## 347 должность S
## 348 должный A
## 349 дом S
## 350 дома ADV
## 351 домашний A
## 352 домой ADV
## 353 доносить V
## 354 дополнительный A
## 355 допрос S
## 356 допускать V
## 357 дорогой A
## 358 досада S
## 359 досиживать V
## 360 доставать V
## 361 достаточно ADV
## 362 достучаться V
## 363 дочитывать V
## 364 дочка S
## 365 дочь S
## 366 драка S
## 367 друг S
## 368 другой APRO
## 369 дружить V
## 370 думать V
## 371 дура S
## 372 дурак S
## 373 дуться V
## 374 дух S
## 375 дядюшка S
## 376 евгений S
## 377 его APRO
## 378 единственный A
## 379 ее APRO
## 380 если CONJ
## 381 естественно ADV
## 382 есть V
## 383 ехать V
## 384 ехидно ADV
## 385 ехидный A
## 386 еще ADV
## 387 жалеть V
## 388 жалкий A
## 389 жаль ADV
## 390 жанр S
## 391 ждать V
## 392 же PART
## 393 желание S
## 394 желать V
## 395 железный A
## 396 жена S
## 397 женатый A
## 398 жениться V
## 399 жених S
## 400 женский A
## 401 женщина S
## 402 жертва S
## 403 жест S
## 404 живой A
## 405 жизненный A
## 406 жизнь S
## 407 жить V
## 408 жутко ADV
## 409 за PR
## 410 забавно ADV
## 411 забирать V
## 412 забота S
## 413 заботить V
## 414 заботиться V
## 415 заботливо ADV
## 416 заботливый A
## 417 забывать V
## 418 забываться V
## 419 заведение S
## 420 завершаться V
## 421 зависимость S
## 422 завод S
## 423 заводить V
## 424 завтра ADV
## 425 завязнуть V
## 426 завязываться V
## 427 загадочно ADV
## 428 загадочный A
## 429 заглаживать V
## 430 заглядывать V
## 431 заговаривать V
## 432 задабривать V
## 433 задавать V
## 434 задание S
## 435 задерживать V
## 436 задний A
## 437 задолбать? V
## 438 задумчивый A
## 439 задумываться V
## 440 заигрывать V
## 441 заинтересованность S
## 442 заинтересованный A
## 443 заинтересовывать V
## 444 зайти V
## 445 закалывать V
## 446 заканчивать V
## 447 заканчиваться V
## 448 закидывать V
## 449 заключать V
## 450 закон S
## 451 законный A
## 452 закрытый A
## 453 закуривать V
## 454 замечание S
## 455 замечать V
## 456 замуж ADV
## 457 занимать V
## 458 заниматься V
## 459 занятие S
## 460 занятый A
## 461 запах S
## 462 запеленывать V
## 463 запечатлевать V
## 464 заподозривать V
## 465 запрещать V
## 466 засмеяться V
## 467 заставать V
## 468 заставлять V
## 469 застукивать V
## 470 заступаться V
## 471 затевать V
## 472 захотеть V
## 473 зачем ADVPRO
## 474 защищать V
## 475 звать V
## 476 звук S
## 477 здесь ADVPRO
## 478 здороваться V
## 479 здоровый A
## 480 зеркало S
## 481 злиться V
## 482 зло S
## 483 злоба S
## 484 злой A
## 485 злость S
## 486 знак S
## 487 знакомая S
## 488 знакомиться V
## 489 знакомство S
## 490 знакомый S
## 491 знакомый A
## 492 знать V
## 493 значит ADV
## 494 золотой A
## 495 зрелище S
## 496 зрение S
## 497 зритель S
## 498 зуб S
## 499 и CONJ
## 500 игнорировать V
## 501 игра S
## 502 играть V
## 503 играться V
## 504 игрушка S
## 505 идеально ADV
## 506 идеальный A
## 507 идиотка S
## 508 идти V
## 509 из PR
## 510 из-за PR
## 511 избавляться V
## 512 избалованный A
## 513 избаловывать V
## 514 избегать V
## 515 извинять V
## 516 извиняться V
## 517 излюбленный A
## 518 измена S
## 519 изменять V
## 520 изменяться V
## 521 изначально ADV
## 522 изображать V
## 523 изумление S
## 524 изумлять V
## 525 или CONJ
## 526 именно PART
## 527 иметь V
## 528 имя S
## 529 иначе CONJ
## 530 иногда ADV
## 531 инородный A
## 532 интеллектуальный A
## 533 интеллигентный A
## 534 интервью S
## 535 интерес S
## 536 интересно ADV
## 537 интересность? S
## 538 интересный A
## 539 интересовать V
## 540 интересоваться V
## 541 интерпретировать V
## 542 интрижка S
## 543 информация S
## 544 искать V
## 545 использовать V
## 546 исправлять V
## 547 испуг S
## 548 испуганно ADV
## 549 испугать V
## 550 испугаться V
## 551 испытывать V
## 552 испытываться V
## 553 история S
## 554 итог S
## 555 их APRO
## 556 к PR
## 557 кабинет S
## 558 каверзный A
## 559 кадр S
## 560 каждый APRO
## 561 кажется ADV
## 562 казаться V
## 563 как CONJ
## 564 как ADVPRO
## 565 как-нибудь ADVPRO
## 566 как-то ADVPRO
## 567 какой APRO
## 568 какой-нибудь APRO
## 569 какой-то APRO
## 570 капризничать V
## 571 капризный A
## 572 картина S
## 573 картинка S
## 574 касаться V
## 575 кафе S
## 576 кафешок? S
## 577 качество S
## 578 квартира S
## 579 кино S
## 580 кинуть V
## 581 кит S
## 582 классика S
## 583 классный A
## 584 класть V
## 585 клуб S
## 586 книга S
## 587 книжка S
## 588 книжный A
## 589 ко PR
## 590 когда CONJ
## 591 когда ADVPRO
## 592 когда-то ADVPRO
## 593 кокетливый A
## 594 коктейль S
## 595 коллега S
## 596 кольцо S
## 597 командировка S
## 598 комментарий S
## 599 коммуницировать? V
## 600 комната S
## 601 компания S
## 602 комплимент S
## 603 компромисс S
## 604 комфортно ADV
## 605 конец S
## 606 конечно ADV
## 607 конструктивно ADV
## 608 конструктивный A
## 609 контакт S
## 610 контактировать V
## 611 конфиденциальный A
## 612 конфликт S
## 613 конфликтный A
## 614 концовка S
## 615 кормить V
## 616 коробочка S
## 617 короткий A
## 618 короче ADV
## 619 корпус S
## 620 косметика S
## 621 косяк S
## 622 котенок S
## 623 котик S
## 624 который APRO
## 625 кофе S
## 626 край S
## 627 крайний A
## 628 красавица S
## 629 красивый A
## 630 краситься V
## 631 красный A
## 632 красота S
## 633 крепкий A
## 634 крепко ADV
## 635 кресло S
## 636 кристи S
## 637 кричать V
## 638 кроватка S
## 639 кроха S
## 640 кстати ADV
## 641 кто SPRO
## 642 кто-то SPRO
## 643 куда ADVPRO
## 644 куда-то ADVPRO
## 645 кукла S
## 646 кулак S
## 647 кулек S
## 648 курить V
## 649 кусочек S
## 650 куча S
## 651 кушетка S
## 652 ладиться V
## 653 ладно PART
## 654 лаконично ADV
## 655 левый A
## 656 легализоваться V
## 657 легкий A
## 658 легко ADV
## 659 лежать V
## 660 лезть V
## 661 летний A
## 662 ли PART
## 663 либо CONJ
## 664 линия S
## 665 литература S
## 666 лицо S
## 667 лично ADV
## 668 личный A
## 669 лишний A
## 670 лишь PART
## 671 лобызаться V
## 672 лукавый A
## 673 любимый A
## 674 любить V
## 675 любовник S
## 676 любовница S
## 677 любовный A
## 678 любовь S
## 679 любой APRO
## 680 любопытство S
## 681 м S
## 682 макияж S
## 683 маленький A
## 684 мало ADV
## 685 малолетняя S
## 686 малый A
## 687 малыш S
## 688 малышка S
## 689 мама S
## 690 манера S
## 691 маньяк S
## 692 марафет S
## 693 март S
## 694 марта S
## 695 материнский A
## 696 материнство S
## 697 мать S
## 698 мгновение S
## 699 медицинский A
## 700 медсестра S
## 701 между PR
## 702 мема? S
## 703 менее ADV
## 704 ментальный A
## 705 мера S
## 706 мероприятие S
## 707 мертвый A
## 708 место S
## 709 мечта S
## 710 мечтательный A
## 711 мечтать V
## 712 мило ADV
## 713 милый A
## 714 минус S
## 715 минута S
## 716 минутка S
## 717 мир S
## 718 мирно ADV
## 719 младенец S
## 720 младший A
## 721 мнение S
## 722 многий APRO
## 723 много ADV
## 724 может ADV
## 725 можно ADV
## 726 мой APRO
## 727 молить V
## 728 молодой A
## 729 момент S
## 730 моральный A
## 731 мочь V
## 732 мудрость S
## 733 муж S
## 734 мужик S
## 735 мужской A
## 736 мужчина S
## 737 мутить V
## 738 мучительный A
## 739 мы SPRO
## 740 мысль S
## 741 мягкий A
## 742 мягко ADV
## 743 на PR
## 744 наблюдать V
## 745 наброситься V
## 746 наверно ADV
## 747 наверное ADV
## 748 наверняка PART
## 749 наводить V
## 750 навредить V
## 751 навсегда ADV
## 752 нагружать V
## 753 над PR
## 754 надавливать V
## 755 надеяться V
## 756 надо ADV
## 757 надоедать V
## 758 надумывать V
## 759 назойливый A
## 760 называть V
## 761 называться V
## 762 наивный A
## 763 наказывать V
## 764 наклон S
## 765 наклонять V
## 766 наклоняться V
## 767 наконец ADV
## 768 накрасить V
## 769 налаживать V
## 770 намекать V
## 771 намерение S
## 772 намеренный A
## 773 намного ADV
## 774 наносить V
## 775 наоборот ADV
## 776 написать V
## 777 напоминать V
## 778 направлять V
## 779 например ADV
## 780 напролет ADV
## 781 напряженно ADV
## 782 напряженный A
## 783 напугать V
## 784 наругать? V
## 785 нарушать V
## 786 наряд S
## 787 наседать V
## 788 насколько ADV
## 789 наскучивать V
## 790 насмешка S
## 791 наставлять V
## 792 настаивать V
## 793 настойчиво ADV
## 794 настойчивость S
## 795 настойчивый A
## 796 настолько ADV
## 797 настоящее S
## 798 настоящий A
## 799 настраивать V
## 800 настроение S
## 801 наступать V
## 802 насчет PR
## 803 наталкивать V
## 804 научать V
## 805 нахмуривать V
## 806 находить V
## 807 находиться V
## 808 начало S
## 809 начальник S
## 810 начальство S
## 811 начинать V
## 812 начинаться V
## 813 начинающий A
## 814 не PART
## 815 неаккуратный A
## 816 небольшой A
## 817 небрежно ADV
## 818 невкусно ADV
## 819 невоспитанность S
## 820 негативный A
## 821 недавно ADV
## 822 неделя S
## 823 недовольно ADV
## 824 недовольный A
## 825 недовольство S
## 826 недопонимание S
## 827 недоумение S
## 828 нежелание S
## 829 нежелательно ADV
## 830 нежность S
## 831 незаинтересованность S
## 832 незамужний A
## 833 незнакомец S
## 834 неизвестно ADV
## 835 неинтересный A
## 836 некий APRO
## 837 некомфортно? ADV
## 838 некоторый APRO
## 839 нелегкий A
## 840 нелепый A
## 841 нелестный A
## 842 неловко ADV
## 843 неловкость S
## 844 нельзя ADV
## 845 немало ADV
## 846 немного ADV
## 847 немножечко ADV
## 848 немножко ADV
## 849 немой A
## 850 ненаглядный A
## 851 ненормально ADV
## 852 ненужный A
## 853 необходимость S
## 854 необычно ADV
## 855 неожиданно ADV
## 856 неожиданность S
## 857 неожиданный A
## 858 неопределенность S
## 859 непонимание S
## 860 непонятно ADV
## 861 непонятный A
## 862 непосредственно ADV
## 863 непотребство S
## 864 неправильно ADV
## 865 неприличный A
## 866 неприязнь S
## 867 неприятно ADV
## 868 неприятный A
## 869 непростой A
## 870 нереализованный A
## 871 несерьезный A
## 872 несколько ADV
## 873 несколько NUM
## 874 несмотря ADV
## 875 нести V
## 876 несчастный A
## 877 нет PART
## 878 нет ADV
## 879 неуважительный A
## 880 неуверенность S
## 881 неудовлетворенный A
## 882 неформальный A
## 883 неясность S
## 884 неясный A
## 885 ни PART
## 886 ни CONJ
## 887 никак ADVPRO
## 888 никакой APRO
## 889 никогда ADVPRO
## 890 никто SPRO
## 891 никуда ADVPRO
## 892 ничего ADV
## 893 ничто SPRO
## 894 но CONJ
## 895 новорожденный A
## 896 новость S
## 897 новый A
## 898 нога S
## 899 номер S
## 900 норма S
## 901 нормально ADV
## 902 нормальный A
## 903 нос S
## 904 носить V
## 905 нотация S
## 906 ночнушка? S
## 907 ночь S
## 908 нравиться V
## 909 нравоучение S
## 910 ну PART
## 911 нужда S
## 912 нужно ADV
## 913 нужный A
## 914 нянечка S
## 915 нянчиться V
## 916 нянька S
## 917 нянюшка S
## 918 няня S
## 919 о PR
## 920 об PR
## 921 оба NUM
## 922 обдумывать V
## 923 обезличивать V
## 924 оберегать V
## 925 обертываться V
## 926 обескураженно? ADV
## 927 обескураживать V
## 928 обеспечивать V
## 929 обеспокоенно ADV
## 930 обеспокоенность S
## 931 обидно ADV
## 932 обидчик S
## 933 обижать V
## 934 обижаться V
## 935 обиженный A
## 936 облажаться? V
## 937 облегчение S
## 938 обманывать V
## 939 обнаженный A
## 940 обнаруживать V
## 941 обнимать V
## 942 обниматься V
## 943 оборачиваться V
## 944 образ S
## 945 обратно ADV
## 946 обратный A
## 947 обращать V
## 948 обращаться V
## 949 обременять V
## 950 обронить V
## 951 обстановка S
## 952 обстоятельство S
## 953 обсуждать V
## 954 обучение S
## 955 общаться V
## 956 общение S
## 957 общественный A
## 958 общий A
## 959 объединение S
## 960 объект S
## 961 объяснение S
## 962 объяснять V
## 963 объясняться V
## 964 обыденный A
## 965 обычно ADV
## 966 обычный A
## 967 обязанность S
## 968 ого INTJ
## 969 оголять V
## 970 одевать V
## 971 одежда S
## 972 одергивать V
## 973 одеяло S
## 974 одеяние S
## 975 один APRO
## 976 один ANUM
## 977 одинокий A
## 978 одиночество S
## 979 однако CONJ
## 980 однозначно ADV
## 981 однотонный A
## 982 ожидание S
## 983 ожидать V
## 984 озабочивать V
## 985 озадаченно ADV
## 986 озадачивать V
## 987 ой INTJ
## 988 оказывать V
## 989 оказываться V
## 990 окликать V
## 991 окно S
## 992 около PR
## 993 округа S
## 994 окружать V
## 995 окружающие S
## 996 он SPRO
## 997 она SPRO
## 998 онегин S
## 999 они SPRO
## 1000 оно SPRO
## 1001 опа? S
## 1002 опаздывать V
## 1003 опешить V
## 1004 описывать V
## 1005 оправдывать V
## 1006 определенно ADV
## 1007 опрятно ADV
## 1008 опускать V
## 1009 опыт S
## 1010 опять ADV
## 1011 оскорбление S
## 1012 оскорблять V
## 1013 особенно ADV
## 1014 особо ADV
## 1015 особый A
## 1016 осознавать V
## 1017 оставаться V
## 1018 оставлять V
## 1019 останавливать V
## 1020 осторожный A
## 1021 осчастливливать V
## 1022 от PR
## 1023 отваживать V
## 1024 отвергать V
## 1025 отвертеться V
## 1026 отвертываться V
## 1027 ответ S
## 1028 ответственность S
## 1029 отвечать V
## 1030 отвлекать V
## 1031 отвлекаться V
## 1032 отвлеченный A
## 1033 отводить V
## 1034 отворачивать V
## 1035 отворачиваться V
## 1036 отвращение S
## 1037 отгибать V
## 1038 отгораживаться V
## 1039 отдавать V
## 1040 отдаляться V
## 1041 отдельно ADV
## 1042 отдыхать V
## 1043 отель S
## 1044 отец S
## 1045 отказ S
## 1046 отказывать V
## 1047 отказываться V
## 1048 откладывать V
## 1049 откланиваться V
## 1050 открывание S
## 1051 открытка S
## 1052 откуда-то ADVPRO
## 1053 отлично ADV
## 1054 относить V
## 1055 относиться V
## 1056 отношение S
## 1057 отодвигаться V
## 1058 отплачивать V
## 1059 отправляться V
## 1060 отпрядывать V
## 1061 отпускать V
## 1062 отражать V
## 1063 отреагировать V
## 1064 отставать V
## 1065 отстраненно ADV
## 1066 отстраненность S
## 1067 отстранять V
## 1068 отстраняться V
## 1069 отступать V
## 1070 отсюда ADVPRO
## 1071 отталкивать V
## 1072 оттягивать V
## 1073 отхватывать V
## 1074 отходить V
## 1075 отчасти ADV
## 1076 отчаяние S
## 1077 отчуждать V
## 1078 отчужденно ADV
## 1079 отшивать V
## 1080 официантка S
## 1081 охватывать V
## 1082 охладевать V
## 1083 оценивать V
## 1084 очаровательный A
## 1085 очень ADV
## 1086 очередной A
## 1087 очередь S
## 1088 ошарашивать V
## 1089 ошибка S
## 1090 ощущать V
## 1091 ощущение S
## 1092 паб S
## 1093 палец S
## 1094 папа S
## 1095 папироса S
## 1096 пара S
## 1097 парень S
## 1098 парк S
## 1099 парочка S
## 1100 партнер S
## 1101 партнерский A
## 1102 пахнуть V
## 1103 пеленать V
## 1104 пепельница S
## 1105 первый ANUM
## 1106 переглядываться V
## 1107 перед PR
## 1108 передавать V
## 1109 передача S
## 1110 передний A
## 1111 переживание S
## 1112 переживать V
## 1113 перекидываться V
## 1114 перелагать V
## 1115 переменчивость S
## 1116 переминать V
## 1117 переносить V
## 1118 перепалка S
## 1119 перерастать V
## 1120 пересказ S
## 1121 переспать V
## 1122 переставать V
## 1123 перетягивать V
## 1124 переубеждать V
## 1125 переходить V
## 1126 перечислять V
## 1127 период S
## 1128 персона S
## 1129 персонаж S
## 1130 перспектива S
## 1131 песок S
## 1132 печальный A
## 1133 пилить V
## 1134 писать V
## 1135 письмо S
## 1136 питать V
## 1137 пить V
## 1138 пища S
## 1139 плакат S
## 1140 плакать V
## 1141 план S
## 1142 платье S
## 1143 плач S
## 1144 плечо S
## 1145 плохо ADV
## 1146 плохой A
## 1147 плюс CONJ
## 1148 по PR
## 1149 по-отечески ADV
## 1150 побежать V
## 1151 побеседовать V
## 1152 побыть V
## 1153 поведение S
## 1154 поведывать V
## 1155 повертывать V
## 1156 повертываться V
## 1157 повзаимодействовать? V
## 1158 повздорить V
## 1159 повзрослеть V
## 1160 повод S
## 1161 поводить V
## 1162 поглядывать V
## 1163 поговорить V
## 1164 погружать V
## 1165 погулять V
## 1166 под PR
## 1167 подавать V
## 1168 подарить V
## 1169 подарок S
## 1170 подготовить V
## 1171 поддерживать V
## 1172 поделиться V
## 1173 подержать V
## 1174 поджимать V
## 1175 подкатывать V
## 1176 подключать V
## 1177 подлезать V
## 1178 подобный A
## 1179 подозревать V
## 1180 подол S
## 1181 подопечный A
## 1182 подруга S
## 1183 подружка S
## 1184 подсаживаться V
## 1185 подсказка S
## 1186 подслушивать V
## 1187 подтягивать V
## 1188 подумать V
## 1189 подходить V
## 1190 поехать V
## 1191 пожалуйста PART
## 1192 пожениться V
## 1193 пожилой A
## 1194 поза S
## 1195 позвать V
## 1196 поздно ADV
## 1197 поздороваться V
## 1198 позировать V
## 1199 познакомиться V
## 1200 поиграть V
## 1201 поиграться V
## 1202 поинтересоваться V
## 1203 поискать V
## 1204 пойти V
## 1205 пока CONJ
## 1206 показывать V
## 1207 показываться V
## 1208 покой S
## 1209 пол S
## 1210 полагать V
## 1211 поле S
## 1212 полезно ADV
## 1213 поличное S
## 1214 полностью ADV
## 1215 полный A
## 1216 полосатый A
## 1217 полуголый A
## 1218 получать V
## 1219 получаться V
## 1220 польза S
## 1221 полюбить V
## 1222 полюбой? S
## 1223 помешать V
## 1224 помещение S
## 1225 помириться V
## 1226 помогать V
## 1227 помощь S
## 1228 помыть V
## 1229 понимание S
## 1230 понимать V
## 1231 понравиться V
## 1232 понятный A
## 1233 попадать V
## 1234 попадаться V
## 1235 попечение S
## 1236 попробовать V
## 1237 попросить V
## 1238 попытаться V
## 1239 попытка S
## 1240 пора ADV
## 1241 пора S
## 1242 портрет S
## 1243 поругаться V
## 1244 порыв S
## 1245 посадить V
## 1246 посидеть V
## 1247 после PR
## 1248 после ADV
## 1249 последовать V
## 1250 последствие S
## 1251 послушать V
## 1252 посмотреть V
## 1253 поссориться V
## 1254 поставлять V
## 1255 постепенно ADV
## 1256 постоялец S
## 1257 постоянно ADV
## 1258 постоянный A
## 1259 поступок S
## 1260 потаенный A
## 1261 потерянно ADV
## 1262 потерять V
## 1263 потом ADVPRO
## 1264 потому ADVPRO
## 1265 потребность S
## 1266 потревожить V
## 1267 поужинать V
## 1268 поучать V
## 1269 пофлиртовать V
## 1270 похабность S
## 1271 похлопать V
## 1272 походка S
## 1273 похоже ADV
## 1274 похожий A
## 1275 похоть S
## 1276 поцеловать V
## 1277 почему ADVPRO
## 1278 почему-то ADVPRO
## 1279 почувствовать V
## 1280 пошутить V
## 1281 пощада S
## 1282 поэтому ADVPRO
## 1283 появление S
## 1284 появляться V
## 1285 правда S
## 1286 правда ADV
## 1287 правило S
## 1288 правильно ADV
## 1289 правильный A
## 1290 правый A
## 1291 праздничный A
## 1292 пребывать V
## 1293 превосходство S
## 1294 преграда S
## 1295 предел S
## 1296 предлагать V
## 1297 предложение S
## 1298 предмет S
## 1299 предотвращать V
## 1300 предполагать V
## 1301 предпринимать V
## 1302 предприятие S
## 1303 представление S
## 1304 представлять V
## 1305 представляться V
## 1306 предупреждать V
## 1307 предшествовать V
## 1308 презрение S
## 1309 прекрасно ADV
## 1310 прекрасный A
## 1311 преподаватель S
## 1312 прерывать V
## 1313 прецедент S
## 1314 при PR
## 1315 привет S
## 1316 привлекательный A
## 1317 привлекать V
## 1318 привлечение S
## 1319 привыкать V
## 1320 привязывать V
## 1321 пригибаться V
## 1322 придерживать V
## 1323 придумывать V
## 1324 приезжать V
## 1325 прижиматься V
## 1326 признавать V
## 1327 признаваться V
## 1328 прийти V
## 1329 приказывать V
## 1330 прикольно ADV
## 1331 прикуривать V
## 1332 приличный A
## 1333 применять V
## 1334 примеривать V
## 1335 примерно ADV
## 1336 принимать V
## 1337 приносить V
## 1338 принц S
## 1339 принцип S
## 1340 принятие S
## 1341 приобнимать? V
## 1342 приоткрывать V
## 1343 приподнятый A
## 1344 приподымать V
## 1345 природа S
## 1346 приседать V
## 1347 прислуга S
## 1348 присмотр S
## 1349 приставать V
## 1350 приставлять V
## 1351 пристально ADV
## 1352 пристальный A
## 1353 пристрастие S
## 1354 присутствие S
## 1355 приходить V
## 1356 причем CONJ
## 1357 прическа S
## 1358 причина S
## 1359 причитать V
## 1360 приятно ADV
## 1361 приятный A
## 1362 про PR
## 1363 проблема S
## 1364 проваливать V
## 1365 провиниться V
## 1366 проводить V
## 1367 провожать V
## 1368 прогибать V
## 1369 проглядывать V
## 1370 прогнать V
## 1371 продолжать V
## 1372 продолжение S
## 1373 произносить V
## 1374 происходить V
## 1375 пропадать V
## 1376 прорабатывать V
## 1377 просекать V
## 1378 просить V
## 1379 просто PART
## 1380 просто ADV
## 1381 пространство S
## 1382 проступок S
## 1383 просыпаться V
## 1384 просьба S
## 1385 противиться V
## 1386 противно ADV
## 1387 противоположный A
## 1388 протягивать V
## 1389 проходить V
## 1390 процент S
## 1391 процесс S
## 1392 прочь ADV
## 1393 прошлое S
## 1394 прошлый A
## 1395 прощать V
## 1396 проявлять V
## 1397 прямо PART
## 1398 прямой A
## 1399 публичный A
## 1400 пугать V
## 1401 пупс S
## 1402 пускай PART
## 1403 путешествие S
## 1404 путь S
## 1405 пуфик S
## 1406 пытаться V
## 1407 пытка S
## 1408 пять NUM
## 1409 работа S
## 1410 работать V
## 1411 работник S
## 1412 работящий A
## 1413 равнодушие S
## 1414 равный A
## 1415 рад A
## 1416 радовать V
## 1417 радостный A
## 1418 радость S
## 1419 раз S
## 1420 разбираться V
## 1421 развертываться V
## 1422 развеселять V
## 1423 развлекаться V
## 1424 развод S
## 1425 разводиться V
## 1426 разговаривать V
## 1427 разговор S
## 1428 раздосадовать V
## 1429 раздражать V
## 1430 раздражение S
## 1431 раздраженность S
## 1432 раздраженный A
## 1433 различаться V
## 1434 размер S
## 1435 размышлять V
## 1436 разногласие S
## 1437 разный A
## 1438 разовый A
## 1439 разозлиться V
## 1440 разочарование S
## 1441 разрешать V
## 1442 разрешаться V
## 1443 разум S
## 1444 ранее ADV
## 1445 рано ADV
## 1446 раскусывать V
## 1447 распивать V
## 1448 расписание S
## 1449 расплакаться V
## 1450 располагать V
## 1451 расположение S
## 1452 расположенность S
## 1453 рассевать V
## 1454 рассеиваться V
## 1455 рассердить V
## 1456 рассказ S
## 1457 рассказывать V
## 1458 расслаблять V
## 1459 расставание S
## 1460 расставаться V
## 1461 расстояние S
## 1462 расстраивать V
## 1463 расстраиваться V
## 1464 расстроенный A
## 1465 рассуждать V
## 1466 растерянный A
## 1467 расходиться V
## 1468 рваться V
## 1469 реагировать V
## 1470 ребенок S
## 1471 ребеночек S
## 1472 ревновать V
## 1473 ревность S
## 1474 резко ADV
## 1475 репетитор S
## 1476 репетиторство S
## 1477 ресторан S
## 1478 ресурс S
## 1479 решать V
## 1480 решение S
## 1481 решимость S
## 1482 решительно ADV
## 1483 решительный A
## 1484 рисунок S
## 1485 род S
## 1486 родитель S
## 1487 родительница S
## 1488 родственник S
## 1489 родственный A
## 1490 родство S
## 1491 рожать V
## 1492 розовый A
## 1493 роль S
## 1494 романтика S
## 1495 романтический A
## 1496 романтичный A
## 1497 рот S
## 1498 ругать V
## 1499 ругаться V
## 1500 рука S
## 1501 рывок S
## 1502 рядом ADV
## 1503 с PR
## 1504 сад S
## 1505 садиться V
## 1506 салиться V
## 1507 сам APRO
## 1508 самооценка S
## 1509 самоуважение S
## 1510 самый APRO
## 1511 сара S
## 1512 сбегать V
## 1513 сборная S
## 1514 сверстник S
## 1515 свершаться V
## 1516 свет S
## 1517 светлый A
## 1518 светский A
## 1519 свидание S
## 1520 свидос? S
## 1521 свобода S
## 1522 свой APRO
## 1523 свой SPRO
## 1524 связанный A
## 1525 связывать V
## 1526 связь S
## 1527 сглаживать V
## 1528 сдаваться V
## 1529 сделать V
## 1530 сдержанный A
## 1531 сдерживать V
## 1532 себя SPRO
## 1533 сегодня ADV
## 1534 сей APRO
## 1535 сейчас ADV
## 1536 секретарша S
## 1537 семейный A
## 1538 семья S
## 1539 сепарироваться V
## 1540 сервис S
## 1541 сердито ADV
## 1542 сережка S
## 1543 серьезно ADV
## 1544 серьезный A
## 1545 сестра S
## 1546 сестренка S
## 1547 сзади ADV
## 1548 сзади PR
## 1549 сигара S
## 1550 сигарета S
## 1551 сидеть V
## 1552 сила S
## 1553 сильно ADV
## 1554 сильный A
## 1555 симпатизировать V
## 1556 симпатичный A
## 1557 ситуация S
## 1558 сказать V
## 1559 сказка S
## 1560 скандал S
## 1561 сканирование S
## 1562 склонный A
## 1563 склоняться V
## 1564 сколько CONJ
## 1565 сконцентрировать V
## 1566 скоро ADV
## 1567 скрывать V
## 1568 скрываться V
## 1569 скука S
## 1570 скуривать V
## 1571 скучно ADV
## 1572 слева ADV
## 1573 слегка ADV
## 1574 следить V
## 1575 следовать V
## 1576 следующий A
## 1577 слезать V
## 1578 сливаться V
## 1579 слишком ADV
## 1580 словесный A
## 1581 словно CONJ
## 1582 слово S
## 1583 сложно ADV
## 1584 служанка S
## 1585 случай S
## 1586 случайно ADV
## 1587 случайный A
## 1588 случаться V
## 1589 слушать V
## 1590 слышать V
## 1591 смена S
## 1592 сменить V
## 1593 смеяться V
## 1594 смотреть V
## 1595 смочь V
## 1596 смущать V
## 1597 смятение S
## 1598 сначала ADV
## 1599 снимать V
## 1600 снисходительно ADV
## 1601 снова ADV
## 1602 со PR
## 1603 собака S
## 1604 собеседование S
## 1605 собираться V
## 1606 соблазнять V
## 1607 собственно ADV
## 1608 событие S
## 1609 совершенно ADV
## 1610 совесть S
## 1611 совет S
## 1612 совместный A
## 1613 соврать V
## 1614 совсем ADV
## 1615 согласие S
## 1616 соглашаться V
## 1617 создавать V
## 1618 сомневаться V
## 1619 сомнительный A
## 1620 сообщать V
## 1621 соответственно ADV
## 1622 соответствовать V
## 1623 соперник S
## 1624 соперничать V
## 1625 сосед S
## 1626 соседний A
## 1627 сосредотачивать V
## 1628 сосредоточивать V
## 1629 состояние S
## 1630 состоятельный A
## 1631 состояться V
## 1632 сосуществовать V
## 1633 сохранять V
## 1634 спалить V
## 1635 спасаться V
## 1636 спать V
## 1637 специалист S
## 1638 специально ADV
## 1639 спина S
## 1640 спинка S
## 1641 спокойно ADV
## 1642 спокойный A
## 1643 спокойствие S
## 1644 способ S
## 1645 способный A
## 1646 справедливость S
## 1647 справляться V
## 1648 спрашивать V
## 1649 спустя PR
## 1650 спутница S
## 1651 средний A
## 1652 ссора S
## 1653 стандартный A
## 1654 становиться V
## 1655 стараться V
## 1656 старинный A
## 1657 старший A
## 1658 старый A
## 1659 статичный A
## 1660 стихотворение S
## 1661 сто NUM
## 1662 стоить V
## 1663 стол S
## 1664 столик S
## 1665 столовая S
## 1666 сторона S
## 1667 стоять V
## 1668 странно ADV
## 1669 странный A
## 1670 страшный A
## 1671 стремиться V
## 1672 ступор S
## 1673 стыдно ADV
## 1674 судить V
## 1675 судя ADV
## 1676 судя PR
## 1677 супруга S
## 1678 супружеский A
## 1679 сутки S
## 1680 существовать V
## 1681 сфотографировать V
## 1682 сходить V
## 1683 сцена S
## 1684 счастливый A
## 1685 считать V
## 1686 считаться V
## 1687 сын S
## 1688 сюда ADVPRO
## 1689 сюжет S
## 1690 сюрприз S
## 1691 табак S
## 1692 таинственный A
## 1693 так ADVPRO
## 1694 так-то PART
## 1695 также ADV
## 1696 таки PART
## 1697 такой APRO
## 1698 талант S
## 1699 там ADVPRO
## 1700 тандем S
## 1701 танцевать V
## 1702 твой APRO
## 1703 телевизор S
## 1704 тело S
## 1705 тема S
## 1706 темный A
## 1707 теперь ADV
## 1708 тепло S
## 1709 теплый A
## 1710 тест S
## 1711 тетушка S
## 1712 тип S
## 1713 типичный A
## 1714 тиран S
## 1715 тк S
## 1716 то CONJ
## 1717 то SPRO
## 1718 то PART
## 1719 тогда ADVPRO
## 1720 тоже PART
## 1721 только PART
## 1722 том S
## 1723 тон S
## 1724 тот APRO
## 1725 точка S
## 1726 точно ADV
## 1727 тратить V
## 1728 требование S
## 1729 требовать V
## 1730 тревога S
## 1731 тревожный A
## 1732 трезвый A
## 1733 трепет S
## 1734 треугольник S
## 1735 трещина S
## 1736 три NUM
## 1737 трогать V
## 1738 трубка S
## 1739 трудолюбивый A
## 1740 тряпичный A
## 1741 туда ADVPRO
## 1742 тупо ADV
## 1743 тут ADVPRO
## 1744 тучный A
## 1745 ты SPRO
## 1746 тяжело ADV
## 1747 тяжелый A
## 1748 тянуться V
## 1749 у PR
## 1750 убегать V
## 1751 убеждать V
## 1752 убеждаться V
## 1753 убивать V
## 1754 убирать V
## 1755 убираться V
## 1756 уважать V
## 1757 увезти V
## 1758 уверенно ADV
## 1759 уверенность S
## 1760 уверенный A
## 1761 уверять V
## 1762 увидеть V
## 1763 увлекать V
## 1764 увлеченность S
## 1765 уговаривать V
## 1766 угодно PART
## 1767 угол S
## 1768 угрожать V
## 1769 удаваться V
## 1770 удалять V
## 1771 удаляться V
## 1772 удар S
## 1773 ударять V
## 1774 уделять V
## 1775 удерживать V
## 1776 удивление S
## 1777 удивленно ADV
## 1778 удивленный A
## 1779 удивлять V
## 1780 удивляться V
## 1781 удовлетворение S
## 1782 удовлетворять V
## 1783 удовольствие S
## 1784 удрученный A
## 1785 ужасный A
## 1786 уже ADV
## 1787 ужин S
## 1788 ужинать V
## 1789 узнавать V
## 1790 указывать V
## 1791 уклоняться V
## 1792 украсть V
## 1793 улаживать V
## 1794 улица S
## 1795 уловка S
## 1796 улыбаться V
## 1797 улыбка S
## 1798 ум S
## 1799 уметь V
## 1800 умный A
## 1801 умоляющий A
## 1802 упасть V
## 1803 упертость? S
## 1804 упираться V
## 1805 упрашивать V
## 1806 упрек S
## 1807 упрекать V
## 1808 урок S
## 1809 уронить V
## 1810 условно ADV
## 1811 услышать V
## 1812 уснуть V
## 1813 успевать V
## 1814 успокаивать V
## 1815 успокаиваться V
## 1816 уставать V
## 1817 усталость S
## 1818 устраивать V
## 1819 устраиваться V
## 1820 утверждать V
## 1821 утешать V
## 1822 уточнять V
## 1823 ууу? S
## 1824 ухажер S
## 1825 ухаживать V
## 1826 ухмылка S
## 1827 уходить V
## 1828 учение S
## 1829 училище S
## 1830 учитель S
## 1831 учительница S
## 1832 учитывать V
## 1833 учить V
## 1834 учиться V
## 1835 физический A
## 1836 фильм S
## 1837 флирт S
## 1838 флиртовать V
## 1839 фон S
## 1840 фортепьяно S
## 1841 фотограф S
## 1842 фотография S
## 1843 фраза S
## 1844 французский A
## 1845 ха-ха INTJ
## 1846 ханжа S
## 1847 харассмент S
## 1848 хватить V
## 1849 хитро ADV
## 1850 хитрый A
## 1851 хмурый A
## 1852 хобби S
## 1853 ход S
## 1854 ходить V
## 1855 хозяйственный A
## 1856 хозяйство S
## 1857 холл S
## 1858 холодно ADV
## 1859 холодность S
## 1860 холодный A
## 1861 холостяцкий A
## 1862 хороший A
## 1863 хорошо ADV
## 1864 хотеть V
## 1865 хотеться V
## 1866 хоть CONJ
## 1867 хотя CONJ
## 1868 хотя PART
## 1869 цвет S
## 1870 целоваться V
## 1871 целое S
## 1872 целый A
## 1873 цель S
## 1874 центр S
## 1875 цепляться V
## 1876 чад S
## 1877 чай S
## 1878 час S
## 1879 частность S
## 1880 часть S
## 1881 чашка S
## 1882 человек S
## 1883 чем CONJ
## 1884 через PR
## 1885 черный A
## 1886 черта S
## 1887 чилита S
## 1888 число S
## 1889 чисто ADV
## 1890 читать V
## 1891 читаться V
## 1892 что CONJ
## 1893 что SPRO
## 1894 что-либо SPRO
## 1895 что-нибудь SPRO
## 1896 что-то SPRO
## 1897 чтоб CONJ
## 1898 чтобы CONJ
## 1899 чувство S
## 1900 чувствовать V
## 1901 чувствоваться V
## 1902 чудно ADV
## 1903 чуждый A
## 1904 чулок S
## 1905 чуткий A
## 1906 чуть ADV
## 1907 шаг S
## 1908 шалость S
## 1909 шампанское S
## 1910 шептать V
## 1911 шкатулка S
## 1912 шок S
## 1913 шокировать V
## 1914 шутить V
## 1915 шутка S
## 1916 щас ADV
## 1917 э INTJ
## 1918 э S
## 1919 эгоцентричность? S
## 1920 эмоционально ADV
## 1921 эмоциональный A
## 1922 эмоция S
## 1923 эскапизм S
## 1924 эскорт S
## 1925 эскортница? S
## 1926 эталон S
## 1927 это SPRO
## 1928 это PART
## 1929 этот APRO
## 1930 эх INTJ
## 1931 юмор S
## 1932 юный A
## 1933 я SPRO
## 1934 явно ADV
## 1935 язык S
## 1936 яркий A
## 1937 ярко ADV
## 1938 ярость S
# Words <- data.frame(W1 = types(Tokens_S)
# , W2 = str_replace(types(Tokens_S)
# , "([[:alpha:]]+)(_[[:alpha:]]+)"
# , "\\1")
# , stringsAsFactors = FALSE)
# nrow(Words)
# arrange(Words, W1)
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество испытуемых")
Существительные в Клинической группе, которые использовали более двух раз.
frequency - количество раз во всех текстах rank - ранг по общему количеству использования docfreq - количество текстов в которых слово встретилось (количество испытуемых, которые его использовали)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 женщина 83 1 23
## 2 мужчина 69 2 21
## 3 девочка 55 3 16
## 4 девушка 35 4 16
## 6 мама 31 6 15
## 5 ребенок 35 4 14
## 10 рука 21 9 14
## 11 будущее 19 11 12
## 7 дочь 30 7 10
## 9 мать 21 9 10
## 18 сестра 12 15 10
## 8 лицо 23 8 9
## 16 картинка 12 15 9
## 12 кукла 17 12 8
## 13 жена 16 13 8
## 21 ситуация 9 20 8
## 14 человек 13 14 7
## 17 дочка 12 15 7
## 15 друг 12 15 6
## 24 картина 8 23 6
## 25 взгляд 7 25 6
## 30 семья 6 28 6
## 20 муж 9 20 5
## 26 книга 7 25 5
## 28 чувство 6 28 5
## 34 брат 5 33 5
## 19 няня 12 15 4
## 22 младенец 9 20 4
## 23 эмоция 8 23 4
## 27 дело 7 25 4
## 29 мысль 6 28 4
## 31 план 6 28 4
## 33 отношение 5 33 4
## 35 конфликт 5 33 4
## 36 трубка 5 33 4
## 39 внимание 4 38 4
## 46 урок 4 38 4
## 32 нянечка 6 28 3
## 41 знакомство 4 38 3
## 43 измена 4 38 3
## 44 столик 4 38 3
## 45 тип 4 38 3
## 47 момент 4 38 3
## 49 выражение 4 38 3
## 50 проблема 4 38 3
## 52 голова 3 51 3
## 53 время 3 51 3
## 56 кафе 3 51 3
## 58 ссора 3 51 3
## 60 интерес 3 51 3
## 61 знакомый 3 51 3
## 62 диван 3 51 3
## 63 книжка 3 51 3
## 68 выход 3 51 3
## 69 глаз 3 51 3
## 70 разговор 3 51 3
## 71 год 3 51 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 мужчина 131 1 28
## 2 девушка 104 2 27
## 3 женщина 96 3 24
## 4 девочка 85 4 23
## 8 дело 33 8 20
## 10 рука 27 10 20
## 5 ситуация 55 5 19
## 6 ребенок 52 6 18
## 7 мама 38 7 13
## 9 няня 28 9 12
## 15 кукла 18 14 12
## 19 время 16 17 12
## 12 человек 19 12 11
## 14 момент 18 14 11
## 21 внимание 15 21 11
## 22 сторона 15 21 11
## 16 мать 17 16 10
## 17 отношение 16 17 10
## 25 лицо 14 24 10
## 11 картина 22 11 9
## 23 будущее 15 21 9
## 13 диалог 19 12 8
## 18 картинка 16 17 8
## 33 конфликт 10 31 8
## 20 работа 16 17 7
## 24 друг 14 24 7
## 28 пара 12 28 7
## 31 дочка 10 31 7
## 36 игрушка 8 36 7
## 41 взгляд 7 41 7
## 29 мысль 11 29 6
## 37 место 8 36 6
## 38 книга 8 36 6
## 47 глаз 6 46 6
## 51 диван 6 46 6
## 58 дом 6 46 6
## 26 разговор 13 26 5
## 32 кафе 10 31 5
## 42 повод 7 41 5
## 43 чувство 7 41 5
## 45 сестра 7 41 5
## 50 удивление 6 46 5
## 52 эмоция 6 46 5
## 55 родитель 6 46 5
## 57 комната 6 46 5
## 66 помещение 5 60 5
## 27 дочь 13 26 4
## 35 раз 9 35 4
## 44 младенец 7 41 4
## 48 обучение 6 46 4
## 54 игра 6 46 4
## 60 решение 5 60 4
## 61 платье 5 60 4
## 62 план 5 60 4
## 64 жизнь 5 60 4
## 67 ссора 4 67 4
## 68 агрессия 4 67 4
## 69 рот 4 67 4
## 70 итог 4 67 4
## 71 фотография 4 67 4
## 72 тон 4 67 4
## 73 интерес 4 67 4
## 75 тип 4 67 4
## 80 год 4 67 4
## 86 голова 4 67 4
## 87 забота 4 67 4
## 30 служанка 11 29 3
## 34 жена 10 31 3
## 39 муж 8 36 3
## 40 отец 8 36 3
## 46 желание 6 46 3
## 53 вопрос 6 46 3
## 56 урок 6 46 3
## 63 семья 5 60 3
## 74 выражение 4 67 3
## 76 фон 4 67 3
## 77 стол 4 67 3
## 78 контакт 4 67 3
## 81 день 4 67 3
## 82 сила 4 67 3
## 83 дама 4 67 3
## 85 драка 4 67 3
## 90 сигара 3 90 3
## 91 непонимание 3 90 3
## 92 окно 3 90 3
## 93 поза 3 90 3
## 94 тема 3 90 3
## 96 проблема 3 90 3
## 97 сигарета 3 90 3
## 98 вид 3 90 3
## 99 слово 3 90 3
## 101 точка 3 90 3
## 108 занятие 3 90 3
## 112 заведение 3 90 3
## 113 общение 3 90 3
## 114 ощущение 3 90 3
## 115 ресторан 3 90 3
## 118 малыш 3 90 3
## 121 спина 3 90 3
## 122 информация 3 90 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_V") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_V") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_V") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество испытуемых")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_V") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 быть 87 1 24
## 2 хотеть 38 2 18
## 6 сидеть 29 5 17
## 3 пытаться 34 3 15
## 5 мочь 29 5 14
## 8 уходить 24 8 12
## 9 сказать 22 9 12
## 10 смотреть 22 9 12
## 4 думать 32 4 11
## 7 знать 25 7 10
## 11 держать 19 11 10
## 13 подходить 12 13 10
## 15 познакомиться 11 15 10
## 14 приходить 12 13 9
## 16 нравиться 11 15 8
## 20 делать 10 17 8
## 27 пойти 8 25 8
## 12 чувствовать 13 12 7
## 17 казаться 10 17 7
## 18 понимать 10 17 7
## 19 читать 10 17 7
## 22 происходить 9 21 7
## 23 удивлять 9 21 7
## 25 решать 8 25 7
## 24 говорить 9 21 6
## 26 заниматься 8 25 6
## 29 успокаивать 7 29 6
## 33 напугать 6 32 6
## 35 давать 6 32 6
## 30 изображать 7 29 5
## 32 удерживать 6 32 5
## 37 курить 5 36 5
## 40 находиться 5 36 5
## 21 видеть 9 21 4
## 31 играть 7 29 4
## 34 сделать 6 32 4
## 36 изменять 5 36 4
## 38 объяснять 5 36 4
## 42 начинать 5 36 4
## 44 просить 4 44 4
## 45 поддерживать 4 44 4
## 46 обнимать 4 44 4
## 47 расходиться 4 44 4
## 48 поговорить 4 44 4
## 53 спрашивать 4 44 4
## 55 уставать 4 44 4
## 56 отдыхать 4 44 4
## 28 заинтересовывать 8 25 3
## 39 слушать 5 36 3
## 41 разговаривать 5 36 3
## 43 испытывать 5 36 3
## 49 помогать 4 44 3
## 50 случаться 4 44 3
## 51 выглядеть 4 44 3
## 52 продолжать 4 44 3
## 54 узнавать 4 44 3
## 58 сдерживать 3 57 3
## 60 общаться 3 57 3
## 61 встречаться 3 57 3
## 63 получать 3 57 3
## 64 замечать 3 57 3
## 65 отстранять 3 57 3
## 66 оставаться 3 57 3
## 67 застукивать 3 57 3
## 69 обращать 3 57 3
## 70 лежать 3 57 3
## 73 садиться 3 57 3
## 74 вставать 3 57 3
## 75 рожать 3 57 3
## 76 отдавать 3 57 3
## 80 рассказывать 3 57 3
## 83 понравиться 3 57 3
## 84 ждать 3 57 3
## 86 улыбаться 3 57 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_V") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 2 хотеть 90 2 28
## 1 быть 132 1 27
## 3 думать 85 3 25
## 4 мочь 72 4 24
## 5 сидеть 49 5 24
## 8 сказать 32 8 20
## 10 говорить 29 10 20
## 6 пытаться 42 6 19
## 7 уходить 41 7 19
## 9 смотреть 31 9 17
## 17 происходить 25 17 16
## 20 заниматься 23 20 16
## 16 делать 26 15 15
## 14 понимать 27 13 14
## 15 пойти 26 15 14
## 18 подходить 25 17 14
## 23 держать 18 21 13
## 11 знать 29 10 12
## 21 сделать 18 21 12
## 13 изображать 27 13 11
## 19 видеть 25 17 11
## 24 продолжать 16 24 11
## 25 слушать 16 24 11
## 12 казаться 28 12 10
## 22 играть 18 21 10
## 33 приходить 11 29 10
## 26 удивлять 15 26 9
## 27 чувствовать 15 26 9
## 30 спрашивать 11 29 9
## 29 находиться 11 29 8
## 31 удерживать 11 29 8
## 35 выходить 10 34 8
## 38 читать 9 37 8
## 42 ожидать 8 39 8
## 44 объяснять 8 39 8
## 28 рассказывать 12 28 7
## 37 оставаться 9 37 7
## 40 разговаривать 8 39 7
## 49 увидеть 7 45 7
## 51 стоять 7 45 7
## 53 хотеться 7 45 7
## 55 давать 7 45 7
## 56 нравиться 7 45 7
## 32 выглядеть 11 29 6
## 34 идти 10 34 6
## 36 успокаивать 10 34 6
## 39 заинтересовывать 8 39 6
## 45 переживать 7 45 6
## 46 решать 7 45 6
## 52 узнавать 7 45 6
## 54 поговорить 7 45 6
## 48 обращаться 7 45 5
## 58 находить 7 45 5
## 59 напугать 7 45 5
## 60 захотеть 6 60 5
## 61 начинать 6 60 5
## 63 принимать 6 60 5
## 64 заканчиваться 6 60 5
## 66 собираться 6 60 5
## 68 разрешать 5 68 5
## 70 появляться 5 68 5
## 71 увлекать 5 68 5
## 72 расходиться 5 68 5
## 75 получать 5 68 5
## 47 злиться 7 45 4
## 57 испытывать 7 45 4
## 62 попросить 6 60 4
## 65 замечать 6 60 4
## 67 поиграть 6 60 4
## 69 случаться 5 68 4
## 73 показывать 5 68 4
## 74 повертываться 5 68 4
## 78 заставлять 5 68 4
## 79 вступать 5 68 4
## 81 отвертываться 5 68 4
## 83 передавать 5 68 4
## 84 отворачиваться 5 68 4
## 85 останавливать 4 85 4
## 87 послушать 4 85 4
## 88 подумать 4 85 4
## 89 расстраивать 4 85 4
## 92 игнорировать 4 85 4
## 93 бежать 4 85 4
## 94 отвечать 4 85 4
## 98 ругать 4 85 4
## 102 оставлять 4 85 4
## 104 наклоняться 4 85 4
## 41 предшествовать 8 39 3
## 43 уставать 8 39 3
## 50 направлять 7 45 3
## 76 искать 5 68 3
## 77 избегать 5 68 3
## 80 задавать 5 68 3
## 90 садиться 4 85 3
## 91 помогать 4 85 3
## 95 шокировать 4 85 3
## 96 писать 4 85 3
## 97 отдыхать 4 85 3
## 99 приставать 4 85 3
## 100 любить 4 85 3
## 101 наблюдать 4 85 3
## 106 переубеждать 3 105 3
## 107 развлекаться 3 105 3
## 108 потерять 3 105 3
## 110 готовиться 3 105 3
## 111 познакомиться 3 105 3
## 113 отстраняться 3 105 3
## 114 относиться 3 105 3
## 115 разбираться 3 105 3
## 116 воспитывать 3 105 3
## 117 выполнять 3 105 3
## 119 давить 3 105 3
## 120 удивляться 3 105 3
## 122 учиться 3 105 3
## 124 вернуться 3 105 3
## 125 зайти 3 105 3
## 126 убегать 3 105 3
## 127 просить 3 105 3
## 128 восстанавливать 3 105 3
## 130 предлагать 3 105 3
## 131 стараться 3 105 3
## 132 научать 3 105 3
## 133 попытаться 3 105 3
## 134 позвать 3 105 3
## 135 уговаривать 3 105 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_A") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_A") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_A") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_A") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 недовольный 8 1 6
## 2 старший 8 1 5
## 4 прошлый 7 4 5
## 5 хороший 6 5 5
## 6 маленький 6 5 5
## 9 красивый 5 9 5
## 10 задний 5 9 5
## 3 возможный 8 1 4
## 7 молодой 6 5 4
## 8 данный 6 5 4
## 11 спокойный 5 9 4
## 12 злой 5 9 4
## 14 равный 4 14 4
## 13 младший 5 9 3
## 16 готовый 3 15 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_A") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 молодой 27 1 15
## 2 данный 12 2 7
## 3 маленький 10 3 6
## 5 красивый 9 4 6
## 7 общий 8 7 6
## 8 хороший 8 7 6
## 10 интересный 6 10 6
## 11 приятный 6 10 6
## 13 старый 6 10 6
## 4 старший 9 4 5
## 6 похожий 9 4 5
## 12 задний 6 10 5
## 14 прямой 6 10 5
## 16 небольшой 5 15 5
## 9 готовый 8 7 4
## 15 должный 5 15 4
## 17 неприятный 5 15 4
## 18 прошлый 5 15 4
## 19 плохой 4 19 4
## 21 знакомый 4 19 4
## 22 важный 4 19 4
## 25 странный 4 19 4
## 20 личный 4 19 3
## 23 возможный 4 19 3
## 26 близкий 3 26 3
## 27 большой 3 26 3
## 28 спокойный 3 26 3
## 29 обыденный 3 26 3
## 30 следующий 3 26 3
## 33 детский 3 26 3
## 35 подобный 3 26 3
## 36 довольный 3 26 3
## 37 симпатичный 3 26 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_ADV") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_ADV") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_ADV") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_ADV") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 возможно 32 1 11
## 3 очень 15 2 10
## 5 далеко 12 5 10
## 2 скоро 15 2 8
## 4 сейчас 13 4 6
## 7 нужно 6 7 6
## 6 можно 7 6 5
## 10 все 5 9 5
## 8 видно 6 7 4
## 9 кажется 5 9 4
## 11 немного 5 9 4
## 12 наверное 4 12 4
## 13 нет 4 12 4
## 15 хорошо 4 12 3
## 17 много 3 17 3
## 18 сзади 3 17 3
## 19 уже 3 17 3
## 20 явно 3 17 3
## 21 например 3 17 3
## 22 больше 3 17 3
## 23 точно 3 17 3
## 24 еще 3 17 3
## 25 испуганно 3 17 3
## 27 неожиданно 3 17 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_ADV") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 возможно 64 1 20
## 2 скоро 60 2 18
## 3 очень 52 3 16
## 5 еще 24 5 13
## 9 рядом 13 9 13
## 4 наверное 32 4 12
## 7 сейчас 19 7 12
## 6 уже 21 6 11
## 8 вообще 18 8 10
## 12 немного 11 12 10
## 24 много 8 24 8
## 15 нужно 10 15 7
## 17 домой 10 15 7
## 18 вместе 10 15 7
## 19 сильно 9 19 7
## 22 далеко 9 19 7
## 26 хорошо 7 26 7
## 11 например 12 11 6
## 13 совсем 11 12 6
## 14 более 11 12 6
## 20 может 9 19 6
## 28 нет 6 28 6
## 29 больше 6 28 6
## 16 надо 10 15 5
## 25 можно 8 24 5
## 31 наконец 5 31 5
## 21 вероятно 9 19 4
## 23 просто 9 19 4
## 27 особо 7 26 4
## 30 теперь 6 28 4
## 32 неправильно 5 31 4
## 33 спокойно 5 31 4
## 34 видно 5 31 4
## 35 наверно 4 35 4
## 36 неожиданно 4 35 4
## 38 давно 4 35 4
## 40 судя 4 35 4
## 43 немножко 4 35 4
## 44 сзади 4 35 4
## 10 явно 13 9 3
## 37 близко 4 35 3
## 41 чуть 4 35 3
## 46 интересно 4 35 3
## 47 сначала 3 47 3
## 48 точно 3 47 3
## 49 изначально 3 47 3
## 52 щас 3 47 3
## 53 все 3 47 3
## 55 наоборот 3 47 3
## 56 похоже 3 47 3
## 57 достаточно 3 47 3
## 58 долго 3 47 3
## 60 рано 3 47 3
## 61 настойчиво 3 47 3
## 63 стыдно 3 47 3
## 64 правильно 3 47 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_SPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_SPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_SPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_SPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 она 223 1 25
## 2 он 135 2 23
## 3 это 71 3 22
## 5 они 45 5 22
## 4 я 56 4 20
## 6 все 26 6 14
## 7 что-то 25 7 14
## 8 то 21 8 12
## 9 что 13 9 9
## 11 ничто 7 11 6
## 10 ты 10 10 5
## 12 оно 3 12 3
## 13 кто-то 3 12 3
## 16 никто 3 12 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_SPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 она 470 1 30
## 2 он 259 2 30
## 5 они 99 5 29
## 4 это 121 4 26
## 7 что-то 72 7 26
## 6 все 85 6 25
## 3 я 135 3 23
## 8 то 53 8 21
## 10 себя 21 9 14
## 9 что 21 9 12
## 14 кто-то 11 13 10
## 12 ничто 15 12 9
## 11 ты 16 11 7
## 13 вы 11 13 7
## 15 мы 10 15 6
## 16 кто 4 16 4
## 17 никто 3 17 3
## 18 что-нибудь 3 17 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_CONJ") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_CONJ") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_CONJ") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_CONJ") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 2 что 105 2 24
## 1 и 139 1 23
## 3 а 75 3 21
## 7 как 19 7 13
## 4 но 26 4 12
## 6 или 20 6 11
## 5 то 22 5 9
## 8 чтобы 13 8 9
## 10 если 10 10 6
## 11 будто 8 11 6
## 9 либо 11 9 4
## 12 да 4 12 4
## 13 чтоб 3 13 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_CONJ") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 и 333 1 30
## 2 что 226 2 30
## 3 а 118 3 27
## 4 но 68 4 24
## 5 или 56 5 19
## 6 как 54 6 19
## 7 чтобы 36 7 18
## 9 то 21 9 10
## 8 либо 31 8 9
## 10 если 10 10 9
## 11 да 10 10 8
## 13 когда 8 13 8
## 12 пока 9 12 6
## 15 хотя 4 15 4
## 14 однако 7 14 3
## 16 причем 3 16 3
## 17 чем 3 16 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_PART") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_PART") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_PART") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_PART") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 не 129 1 24
## 3 ну 23 3 12
## 6 это 18 6 12
## 2 будто 39 2 11
## 7 просто 15 7 11
## 4 бы 23 3 10
## 5 вот 23 3 10
## 8 нет 8 8 6
## 12 все-таки 5 12 5
## 13 то 5 12 5
## 9 же 6 9 4
## 10 даже 6 9 3
## 11 ли 6 9 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_PART") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 не 222 1 29
## 4 просто 47 4 21
## 5 бы 40 5 20
## 2 вот 115 2 19
## 6 это 30 6 17
## 3 ну 58 3 16
## 7 будто 30 6 16
## 8 же 29 8 15
## 9 даже 18 9 13
## 13 все-таки 9 13 8
## 14 только 8 14 8
## 10 ли 11 10 7
## 11 тоже 11 10 7
## 12 нет 10 12 6
## 15 то 7 15 6
## 18 вроде 5 16 5
## 16 ни 5 16 4
## 19 прямо 4 19 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_APRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_APRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_APRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_APRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 2 этот 30 2 15
## 3 свой 29 3 15
## 1 какой-то 33 1 12
## 4 такой 23 4 11
## 7 который 12 7 10
## 5 ее 16 5 9
## 6 его 13 6 8
## 9 тот 8 9 8
## 8 другой 11 8 7
## 10 весь 5 10 5
## 11 один 5 10 5
## 12 их 4 12 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_APRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 этот 115 1 29
## 3 свой 75 3 26
## 2 какой-то 109 2 23
## 5 который 41 5 19
## 6 ее 34 6 18
## 4 такой 66 4 17
## 7 другой 28 7 15
## 8 весь 19 8 12
## 9 его 14 9 10
## 10 один 13 10 9
## 12 тот 10 12 7
## 11 какой 11 11 6
## 13 их 7 13 6
## 14 сам 7 13 5
## 15 самый 6 15 4
## 17 какой-нибудь 4 16 4
## 16 каждый 4 16 3
## 18 некоторый 3 18 3
set.seed(100)
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_ADVPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Клиническая группа")
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_ADVPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textplot_wordcloud(max_words = 50, min_size = 1, rotation = 0)
title("Контрольная группа")
tstat_S <-Tokens_S3 |>
tokens_keep(pattern = "*_ADVPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество текстов")
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_keep(pattern = "*_ADVPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 2 так 20 2 12
## 3 тут 17 3 12
## 1 как 36 1 9
## 4 потом 12 4 8
## 5 там 11 5 8
## 6 потому 10 6 8
## 7 как-то 8 7 5
## 9 здесь 5 8 5
## 8 поэтому 5 8 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_keep(pattern = "*_ADVPRO") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 так 82 1 26
## 2 как 60 2 22
## 4 как-то 38 4 16
## 3 там 39 3 15
## 5 потому 25 5 13
## 6 куда-то 19 6 10
## 7 здесь 16 7 10
## 8 поэтому 16 7 10
## 11 потом 6 11 6
## 12 куда 6 11 6
## 10 тут 7 10 5
## 13 где 6 11 5
## 9 где-то 8 9 4
## 15 почему-то 4 15 4
## 14 почему 5 14 3
## 16 туда 3 16 3
tstat_S <-Tokens_S3 |>
#tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
tokens_ngrams()|>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество испытуемых")
tstat_S <-Tokens_S3 |>
#tokens_keep(pattern = "*_S") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
tokens_ngrams(n = 3L)|>
dfm() |>
dfm_weight(scheme = "boolean") |>
textstat_frequency(groups = Sample, n = 20)
ggplot(data = tstat_S, aes(x = factor(nrow(tstat_S):1), y = frequency)) +
geom_point() +
facet_wrap(~ group, scales = "free") +
coord_flip() +
scale_x_discrete(breaks = nrow(tstat_S):1,
labels = tstat_S$feature) +
labs(x = NULL, y = "Количество испытуемых")
## Таблица Клиническая
Tokens_S3 |>
tokens_subset(Sample == "Clinical") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
tokens_ngrams(n = 3L)|>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 3 она_не_нравиться 5 3 5
## 2 не_мочь_сказать 6 2 4
## 5 у_она_в 4 5 4
## 6 она_в_рука 4 5 4
## 8 что_она_не 4 5 4
## 9 как_будто_она 4 5 4
## 10 она_как_будто 4 5 4
## 11 к_она_подходить 4 5 4
## 12 то_что_она 4 5 4
## 13 она_не_хотеть 4 5 4
## 15 на_задний_план 4 5 4
## 4 я_казаться_что 5 3 3
## 7 не_знать_что 4 5 3
## 17 мочь_сказать_что 3 17 3
## 18 на_этот_картинка 3 17 3
## 19 в_будущее_они 3 17 3
## 22 смотреть_на_она 3 17 3
## 25 он_не_хотеть 3 17 3
## 28 на_он_смотреть 3 17 3
Tokens_S3 |>
tokens_subset(Sample == "Control") |>
tokens_replace(Dictionary$Word_POS, Dictionary$Word, valuetype = "fixed") |>
tokens_ngrams(n = 3L)|>
dfm() |>
textstat_frequency() |>
filter(docfreq > 2) |>
rename(Lemma = feature) |>
as.data.frame() |> # Почему не работает на исходном объекте select?
arrange(desc(docfreq)) |> # Сортировка по убыванию по полю docfreq
select(-group) # Удаление колонки group
## Lemma frequency rank docfreq
## 1 я_думать_что 32 1 13
## 2 заниматься_свой_дело 11 2 9
## 4 то_что_она 10 4 8
## 5 как_будто_бы 9 5 8
## 8 к_она_подходить 8 6 6
## 11 рядом_с_она 6 10 6
## 12 что_она_не 6 10 6
## 7 на_этот_картина 8 6 5
## 13 мужчина_и_женщина 5 13 5
## 14 то_что_он 5 13 5
## 15 в_данный_момент 5 13 5
## 16 потому_что_он 5 13 5
## 17 скоро_все_он 5 13 5
## 18 скоро_все_это 5 13 5
## 20 сидеть_на_диван 5 13 5
## 21 держать_в_рука 5 13 5
## 23 думать_о_то 5 13 5
## 25 думать_что_она 5 13 5
## 3 я_казаться_что 11 2 4
## 6 и_скоро_все 8 6 4
## 9 мочь_быть_она 7 9 4
## 10 до_это_они 6 10 4
## 19 не_то_чтобы 5 13 4
## 24 думать_что_это 5 13 4
## 26 потому_что_она 5 13 4
## 27 о_то_что 5 13 4
## 29 они_просто_сидеть 4 28 4
## 30 не_понимать_что 4 28 4
## 32 скоро_все_она 4 28 4
## 33 у_она_в 4 28 4
## 34 она_в_рука 4 28 4
## 35 в_рука_книга 4 28 4
## 41 она_не_хотеть 4 28 4
## 44 не_знать_что 4 28 4
## 45 что_у_она 4 28 4
## 46 я_казаться_она 4 28 4
## 47 она_не_ожидать 4 28 4
## 48 не_хотеть_это 4 28 4
## 22 на_картинка_изображать 5 13 3
## 37 так_скоро_все 4 28 3
## 38 в_свой_мысль 4 28 3
## 39 женщина_на_задний 4 28 3
## 40 на_задний_план 4 28 3
## 42 не_хотеть_слушать 4 28 3
## 52 это_у_они 3 51 3
## 54 а_женщина_пытаться 3 51 3
## 55 пытаться_он_останавливать 3 51 3
## 56 женщина_и_мужчина 3 51 3
## 57 то_что_мужчина 3 51 3
## 58 это_они_просто 3 51 3
## 59 мама_и_дочка 3 51 3
## 60 сделать_не_так 3 51 3
## 61 женщина_с_мужчина 3 51 3
## 62 мужчина_скоро_все 3 51 3
## 63 на_то_чтобы 3 51 3
## 64 в_другой_место 3 51 3
## 65 место_а_женщина 3 51 3
## 66 скоро_все_они 3 51 3
## 67 мужчина_подходить_к 3 51 3
## 68 понимать_что_она 3 51 3
## 69 мочь_быть_что 3 51 3
## 70 быть_что_она 3 51 3
## 71 что_мужчина_хотеть 3 51 3
## 72 вот_мочь_быть 3 51 3
## 73 мочь_быть_он 3 51 3
## 74 в_другой_сторона 3 51 3
## 75 в_будущее_они 3 51 3
## 76 они_просто_расходиться 3 51 3
## 77 по_свой_дело 3 51 3
## 79 скоро_все_девушка 3 51 3
## 80 из-за_то_что 3 51 3
## 82 она_не_нравиться 3 51 3
## 83 смотреть_на_она 3 51 3
## 84 но_девочка_не 3 51 3
## 85 не_хотеть_она 3 51 3
## 87 этот_мужчина_и 3 51 3
## 89 думать_что_этот 3 51 3
## 90 не_хотеть_с 3 51 3
## 92 она_на_рука 3 51 3
## 94 у_она_быть 3 51 3
## 95 то_как_он 3 51 3
## 96 об_это_не 3 51 3
## 98 как_будто_она 3 51 3
## 99 и_не_хотеть 3 51 3
## 100 он_не_мочь 3 51 3
## 102 девушка_как_будто 3 51 3
## 103 у_они_быть 3 51 3
## 104 потому_что_у 3 51 3
## 110 к_она_и 3 51 3
## 111 что_он_так 3 51 3
## 113 она_как_будто 3 51 3
Сохранение объектов на диск
#save(Words, file = "Words.RData")