Update kod.R

Typo