is.ChineseTrad: Determining if the input is UTF-8 Chinese traditional
In utf8latex: Importing, Exporting and Converting Between Datasets and LaTeX

Description Usage Arguments Value Author(s) Source References Examples

is.ChineseTrad returns TRUE if the input is UTF-8 Chinese traditional

1	is.ChineseTrad(utf8char)

utf8char

UTF-8 string

logic

Jose Gama

Mark Baker

Mark Baker 2010, Recognizing text as Simplified vs. Traditional Chinese http://stackoverflow.com/questions/4083038/recognizing-text-as-simplified-vs-traditional-chinese

fileIn<-system.file('extdata/TextChineseTrad.txt', package='utf8latex')
# read a UTF-8 string from a file
x <- scan(file=fileIn,'character', fileEncoding='UTF-8')
# check if every character is within the Chinese Traditional Unicode ranges
lapply(unlist(strsplit(x,'')), is.ChineseTrad)