blob: f16249a48200a102f9f6496d6f0ed7d0d6afd924 [file] [log] [blame]
Marc Kupietz686c4312023-06-23 15:41:44 +02001---
2title: "Assembling EuReCo for Contrastive Research"
3subtitle: "The Polish Piece"
4author:
5 - name: Piotr Bański
6 - name: Nils Diewald
7 - name: Marc Kupietz
8 - name: Beata Trawiński
9affiliation:
10 address: IDS Mannheim
11column_numbers: 2
12contact:
13 name: Piotr Bański
14 department: Digital Linguistics
15 email: banski@ids-mannheim.de
16 website: "https://korap.ids-mannheim.de/instance/nkjp1m-sgjp"
17
18output:
19 posterdown::posterdown_ids:
20 self_contained: false
21 keep_md: true
22
23bibliography: references.bib
24csl: "https://raw.githubusercontent.com/ICLC-10/Zotero/master/styles/ICLC-10.csl"
25---
26
27```{r setup, include=FALSE, echo=FALSE, message=FALSE, warning=FALSE}
28knitr::opts_chunk$set(dev = 'svg', echo = FALSE, warning = FALSE)
29source("common.R")
30```
31# Plain collocation analysis
32
33without restriction to NN/subst
34
35## da(wa)?ć
36
37```{r dac_simple, echo=TRUE}
38collocationAnalysis(
39 nkjp,
40 '[nkjp/l="da(wa)?ć"]',
41 leftContextSize = 5,
42 rightContextSize = 5,
43 minOccur = 5
44 ) %>%
45 show_simple_table()
46```
47
48# Identification of Light Verb Constructions
49using collocation analysis
50
51## da(wa)?ć
52
53```{r dac, echo=TRUE}
54collocationAnalysis(
55 nkjp,
56 'focus({[nkjp/l="da(wa)?ć"] []{,5}} [nkjp/p=subst])',
57 leftContextSize = 0,
58 rightContextSize = 1, # relative to { ... } in focus(),
59 minOccur = 5,
60 addExamples = TRUE
61 ) %>%
62 show_table()
63```
64
65### (Z)robić
66
67```{r robic, echo=TRUE}
68collocationAnalysis(
69 nkjp,
70 'focus({[nkjp/l="z?robić"] []{,5}} [nkjp/p=subst])',
71 leftContextSize = 0,
72 rightContextSize = 1, # relative to { ... } in focus(),
73 minOccur = 5,
74 addExamples = TRUE
75 ) %>%
76 show_table()
77```
78
79```{r brac, echo=TRUE}
80collocationAnalysis(
81 nkjp,
82 'focus({[nkjp/l="brać" | nkjp/l="wziąć"] []{,5}} [nkjp/p=subst])',
83 leftContextSize = 0,
84 rightContextSize = 1, # relative to { ... } in focus(),
85 minOccur = 5,
86 addExamples = TRUE
87 ) %>%
88 show_table()