Create k.macIntyre.R