berryFunctions (version 1.21.2)

dupes: Duplicate lines in file

Description

Number of duplicates per line of (text) file. Per default saved to file which can be loaded into excel / libreoffice. With conditional formatting of the first column, colors show for each line how often it occurs in the file. A LibreOffice file is included. Note: OpenOffice does not provide color scales based on cell values.

Usage

dupes(
  file,
  ignore.empty = TRUE,
  ignore.space = TRUE,
  tofile = missing(n),
  n = length(d)
)

Arguments

file

File name (character string)

ignore.empty

Should empty lines be ignored? DEFAULT: TRUE

ignore.space

Should leading/trailing whitespace be ignored? DEFAULT: TRUE

tofile

Logical: should output be directed to a file? Otherwise, a dataframe with line numbers and number of duplicates of that line will be printed in the console. DEFAULT: missing(n)

n

Show only the first n values if tofile=FALSE. DEFAULT: length(d)

Value

Either: a data.frame with line numbers of duplicate rows and the number of duplicates Or: a file is written with the number of duplicates and the original file content.

See Also

compareFiles

Examples

# NOT RUN {
file <- system.file("extdata/doublelines.txt", package="berryFunctions")
dupes(file, tofile=FALSE)
dupes(file, tofile=FALSE, ignore.empty=TRUE)

## These are skipped by rcmd check (opening external places is not allowed):
# }
# NOT RUN {
dupes(file)
# }
# NOT RUN {
# a template file (dupes.ods) for libreOffice Calc is available here:
system.file("extdata", package="berryFunctions")

# }
# NOT RUN {
system2("nautilus", system.file("extdata/dupes.ods", package="berryFunctions"))
# }
# NOT RUN {
# To open folders with system2:
# "nautilus" on linux ubuntu
# "open" or "dolphin" on mac
# "explorer" or "start" on windows

# }