cycles-in-numbers code snippets in r

find if 2 numbers from a premtition are in the same cycle in r