한글

한글 초/중/종성 나누기: 키보드 기준

cho <- unlist(strsplit("ㄱㄲㄴㄷㄸㄹㅁㅂㅃㅅㅆㅇㅈㅉㅊㅋㅌㅍㅎ", "")) jung <- unlist(strsplit("ㅏㅐㅑㅒㅓㅔㅕㅖㅗㅘㅙㅚㅛㅜㅝㅞㅟㅠㅡㅢㅣ", "")) intToUtf8v <- Vectorize(intToUtf8) #jong2 <- c(" ", intToUtf8v(4520:(4520+26))) # 4520 = ㄱ #jong <-…