Используйте %%
для фильтрации чисел, остатки которых после деления на 100 меньше или равны 60.
x <- 715:830
x[x %% 100 <= 60]
# [1] 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730
# [17] 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746
# [33] 747 748 749 750 751 752 753 754 755 756 757 758 759 760 800 801
# [49] 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817
# [65] 818 819 820 821 822 823 824 825 826 827 828 829 830