Update hist_char_classes.r

test