Coal and Coke R functions