read.tfl loads type frequency list from
write.tfl saves type frequency list object in
1 2 3
character string specifying the pathname of a disk file.
Files with extension
a type frequency list, i.e.\ an object of class
specifies the character encoding of the disk
file to be read or written to. See
A TAB-delimited text file with column headers but no row names
(suitable for reading with
read.delim), containing the
type frequencies f_k
optional: the corresponding type IDs k. If missing, increasing non-negative integers are automatically assigned as IDs.
optional: type representations (such as word forms or lemmas)
These columns may appear in any order in the text file. Only the
f column is mandatory and all unrecognized columns will be
If the filename
file ends in the extension
the disk file will automatically be decompressed (
read.tfl) and compressed (
.tfl file format stores neither the values of
V nor the range of type frequencies explicitly. Therefore,
incomplete type frequency lists cannot be fully reconstructed from
disk files (and will not even be recognized as such). An attempt to
save such a list will trigger a corresponding warning.
read.tfl returns an object of class
tfl (see the
tfl manpage for details)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38
## save type-frequency list for Brown corpus to external file fname <- tempfile(fileext=".tfl.gz") # automatically compresses file write.tfl(Brown.tfl, fname) ## file <fname> contains a compressed TAB-delimited table with fields ## k ... type ID (usually Zipf rank) ## f ... frequency of type ## type ... the type itself (here a word form) ## read it back in New.tfl <- read.tfl(fname) ## same as Brown.tfl summary(New.tfl) summary(Brown.tfl) print(New.tfl) print(Brown.tfl) head(New.tfl) head(Brown.tfl) stopifnot(isTRUE(all.equal(New.tfl, Brown.tfl))) # should by identical ## Not run: ## suppose you have a text file with a frequency list, one f per line, e.g.: ## f ## 14 ## 12 ## 31 ## ... ## you can import this with read.tfl MyData.tfl <- read.tfl("mylist.txt") summary(MyData.tfl) print(MyData.tfl) # ids in column k added by zipfR ## from this you can generate a spectrum with tfl2spc MyData.spc <- tfl2spc(MyData.tfl) summary(MyData.spc) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.