Генерация случайной выборки с условием

Question

Итак, я работаю над созданием списка случайных целых чисел от 1 до 100, связанных с этим типом кадра данных.

                         ColumnA                                   ColumnB
                            3.38                                      3.63
                            3.38                                      2.87
                            3.38                                      3.49
                            3.38                                      3.31
                            3.38                                      3.04
                            3.38                                      3.65
                            3.38                                      3.89

Условие, которое мне нужно для проверки, заключается в том, что

abs(weighted.mean(dataframe$ColumnB,ConditionalRandomSample)-dataframe$ColumnA[1]) < Error

где ошибка - предустановленный порог.