Update utils.R

add parameter missing