Bug fixed by R cmd check