Ответ 1
На странице справки "Арифметические операторы" (к которой вы можете перейти через ?"%%") написано
"%% указывает" х мод у
Это полезно только в том случае, если вы выполнили достаточно программирования, чтобы знать, что это относится к модульному делению, то есть делить целое число x на y и возвращать остаток. Это полезно во многих, многих, многих приложениях. Например (из @GavinSimpson в комментариях), %% полезен, если вы запускаете цикл и хотите выводить какой-то индикатор прогресса на экран каждую n-ю итерацию (например, используйте if (i %% 10 == 0) { #do something} чтобы делать что-то каждую 10-ю итерацию).
Так как %% также работает для чисел с плавающей точкой в R, я только что if (any(wts %% 1 != 0)) пример, где if (any(wts %% 1 != 0)) используется для проверки, где любое из значений wts не является целым числом.