Я использую Excel для получения исходных данных и вычисления нескольких уравнений, используя продукты предыдущих уравнений в качестве переменных для последних. Все это прекрасно работает, за исключением одной простой вещи:

Мои значения данных измеряются в двух экземплярах, а пары значений усредняются на самом раннем этапе. В случае, если некоторые дубликаты противоречивы, я бы хотел, чтобы функция усреднения дисквалифицировала обе функции, чтобы они не передавались по цепочке уравнений. Мое ограничение на постоянство составляет 20-процентную разницу; то есть,

| (значение 1 - значение 2) / ((значение 1 + значение 2) / 2) | х 100% где | | означает абсолютное значение.

Все, что меньше 20%, считается хорошим.

1 ответ1

0

Поместите ваши пары данных в столбцы A и B. В С1 введите:

=ABS(A1-B1)/((A1+B1)/2)

и скопируйте вниз:

Теперь, чтобы удалить "плохие" данные, запустите этот короткий макрос:

Sub dural()
    Dim i As Long, N As Long

    N = Cells(Rows.Count, "C").Value
    For i = N To 1 Step -1
        If Cells(i, "C").Value > 0.2 Then Cells(i, "C").EntireRow.Delete
    Next i
End Sub

С результатом:

Продолжайте обрабатывать только оставшиеся данные A & B.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .