Суммирование

[panchos]

Всем привет. У меня возникла проблема. Не получается подсчитать совпадающие элементы. Пример

1
2
1
4
3
5
3
Совпадений 2

Спасибо

[bi-lya]

А проблема-то в чем? Закинуть в массив и 'попересравнивать'?

[Genyaa]

Не получается подсчитать совпадающие элементы.

Может быть так?:

[uhm]

Отсортировать и один раз пройтись циклом, проверяя равенство i-ого элемента и i+1.

[Pavel55]

'для поиска задвоений в столбце А
=ЕСЛИ(ЕЧИСЛО(ПОИСКПОЗ(A2;$A$1:$A1;0))=ИСТИНА;"Задвоение! Надо удалить!";"")
или
=ЕСЛИ(СЧЁТЕСЛИ($A$1:$A1;A2)>0=ИСТИНА;"Задвоение! Надо удалить!";"")

[Krasnaja Shapka]

ну, я бы только удалил у Pavel55 не обязательные "=ИСТИНА"

[Чудовище под кроватью]

Krasnaja Shapka
а я бы еще удалил не обязательные ">0"

[KL]

Всем привет. У меня возникла проблема. Не получается подсчитать совпадающие элементы. Пример

1
2
1
4
3
5
3
Совпадений 2

Спасибо

Если нужно именно то, что описано в вопросе, то...

Вар 1: Только для чисел
=СУММ(--(ЧАСТОТА(A1:A10;A1:A10)>1))

Вар 2: Универсальный
=СУММ(--(ЧАСТОТА(ПОИСКПОЗ(""&A1:A10;""&A1:A10;0);ПОИСКПОЗ(""&A1:A10;""&A1:A10;0))>1))

[Krasnaja Shapka]

офигеть... а что означает "--"?

[Krasnaja Shapka]

нашел что "--" аналогично если(...;1;0)... но блин в два раза удобнее, хотябы тем что вводится не как формула массива... абалдеть... )

[KL]

нашел что "--" аналогично если(...;1;0)... но блин в два раза удобнее, хотябы тем что вводится не как формула массива... абалдеть... )

На всякий пожарный все же поясню

1) кусок ЧАСТОТА(A1:A10;A1:A10)>1 возвращает массив из логических значений ИСТИНА/ЛОЖЬ, например:

{ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}

2) функция СУММ() [как впрочем большинство функций] неспособна сама превратить логические значения ИСТИНА/ЛОЖЬ в их числовые эквиваленты 1/0

3) зато это могут делать элементарные арифметические операторы и функция Ч(), например:


=--{ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}
=Ч({ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ})
=1*{ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}
={ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}/1
=0+{ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}
={ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ;ИСТИНА;ЛОЖЬ;ЛОЖЬ;ЛОЖЬ}^1

все возвращают:

{0;0;1;0;0;0;0;1;0;0;0}

4) но быстрее всех это делает двойной минус (--)

[alibek]

Быстрее даже, чем 0+?
Сложение это одна операция, а двойная смена знака две операции.

[panchos]

а как это в воде будет.

[panchos]

в коде

[panchos]

panchos писал(а):
Не получается подсчитать совпадающие элементы.

Может быть так?:

А что это такое

[GSerg]

panchos, все последующие подобные потоки сознания будут удаляться.

[KL]

Быстрее даже, чем 0+?
Сложение это одна операция, а двойная смена знака две операции.

Да, быстрее даже, чем 0+

вот мои промеры для полного пересчета в XL2003:

=--A1:A65000

первый раз 1,64 мс
последующие 5 раз среднее время 1,0533 мс

=0+A1:A65000

первый раз 2,21 мс
последующие 5 раз среднее время 1,6433 мс

[Krasnaja Shapka]

спасибо ) суперовая штука )

[@Nik]

Вар 1: Только для чисел
=СУММ(--(ЧАСТОТА(A1:A10;A1:A10)>1))

Решение, конечно, суперовое... просто нет слов !!! И задачка тоже, ничё так... мне понравилась... Только чёт я не мог успокоиться, пока не решил эту задачу без функции ЧАСТОТА()... Вот что у меня получилось:

{=СУММ(--(СЧЁТЕСЛИ(A2:A10;Ч(СМЕЩ(A1;ПОИСКПОЗ(СТРОКА(A2:A10)-СТРОКА(A1); ПОИСКПОЗ(A2:A10;A2:A10;0);0); )))>1))}

Исх. данные в диапазоне A2:A10

[KL]

Только чёт я не мог успокоиться, пока не решил эту задачу без функции ЧАСТОТА()... Вот что у меня получилось:

{=СУММ(--(СЧЁТЕСЛИ(A2:A10;Ч(СМЕЩ(A1;ПОИСКПОЗ(СТРОКА(A2:A10)-СТРОКА(A1); ПОИСКПОЗ(A2:A10;A2:A10;0);0); )))>1))}

Теперь используем исходные данные в [A1:A5000] и засекаем время. На моей относительно быстрой машине и Excel2003 получилось следующее:

=СУММ(--(ЧАСТОТА(A1:A5000;A1:A5000)>1))
среднее время полного пересчета (4 промера): 166,84 миллисек


=СУММ(--(ЧАСТОТА(ПОИСКПОЗ(""&A1:A5000;""&A1:A5000;0);ПОИСКПОЗ(""&A1:A5000;""&A1:A5000;0))>1))
среднее время полного пересчета (4 промера): 445,12 миллисек


{=СУММ(--(СЧЁТЕСЛИ(A2:A5000;Ч(СМЕЩ(A1;ПОИСКПОЗ(СТРОКА(A2:A5000)-СТРОКА(A1); ПОИСКПОЗ(A2:A5000;A2:A5000;0);0); )))>1))}
среднее время полного пересчета (4 промера): 1585,26 миллисек

Добавим к этому то, что последняя формула еще и летучая и впору прослезиться

[@Nik]

KL, да ты не так понял.... Разумеется, что твой способ более рациональный по всем показателям.... Это ж очевидно... Мне просто захотелось решить эту задачу другим способом, не используя ф-цию ЧАСТОТА()... Делать мне просто нечего, понимаешь.... хочется мозги посушить....

[KL]

...да ты не так понял.... Разумеется, что твой способ более рациональный по всем показателям....

Это ты не так понял Я не нападаю на тебя, а даю рецензию на твою формулу и объясняю, что при создании формул (особенно массива) надо как минимум следить за...

- кол-вом выполняемых ею операций
- выбором функций для нее
- ее летучестью

Мне просто захотелось решить эту задачу другим способом, не используя ф-цию ЧАСТОТА()...

Это-то как раз мне и непонятно! Функция ЧАСТОТА в разы быстрее, чем СЧЁТЕСЛИ, да и формула с ней в конечном итоге короче и быстрее...

[@Nik]

Тю, да говорю тебе, что мне просто захотелось решить другим способом, без ЧАСТОТА() и неважно как он по быстродействию... Просто для разминки мозгов, понимаешь....? Я вообще думал, что формула получится гораздо более корявая, а эта ещё куда ни шло...
И потом, задача такого типа, как правило, одна на всю таблицу (столбец), а не в каждой строке всего столбца

[KL]

Тю, да говорю тебе, что мне просто захотелось решить другим способом, без ЧАСТОТА() и неважно как он по быстродействию... Просто для разминки мозгов, понимаешь....? Я вообще думал, что формула получится гораздо более корявая, а эта ещё куда ни шло...

тогда я бы сделал так:

=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000&"")>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))

И потом, задача такого типа, как правило, одна на всю таблицу (столбец), а не в каждой строке всего столбца

А кто говорил про это? Чтобы "задушить" файл одной такой формулой, достаточно уже того, чтобы диапазон используемый в этой единственной формуле состоял из тысяч ячеек.[/b]

[@Nik]

Я так понял, ты попытался разложить функцию ЧАСТОТА() на составные части.... Прикольно..... Однако, я смотрю, некорректно отрабатывает пустые ячейки ф-ция СЧЁТЕСЛИ(). Погоняй свою формулу на новом листе, где ещё не было данных и ты увидишь, что она выдаёт бред... А если начинаешь чем-то подменять пустоты, тогда не хочет приниматься СЧЁТЕСЛИ() (у меня Офис ХР рус.)

[KL]

Я так понял, ты попытался разложить функцию ЧАСТОТА() на составные части.... Прикольно..... Однако, я смотрю, некорректно отрабатывает пустые ячейки ф-ция СЧЁТЕСЛИ(). Погоняй свою формулу на новом листе, где ещё не было данных и ты увидишь, что она выдаёт бред... А если начинаешь чем-то подменять пустоты, тогда не хочет приниматься СЧЁТЕСЛИ() (у меня Офис ХР рус.)

У меня версия Офис 2003 англ.
Не уверен, но наверное дело в том, как понимать "некорректно отрабатывает" и "выдаёт бред". В моем понимании пусто - это значение ячейки и имеет такое же право быть учтенным. Другое дело это то, что в зависимости от конкретной ситуации это может быть нужно или нет, но в данном случае никто не говорил, что пустые ячейки не должны учитываться. У меня при наличии более одной пустой ячейки формула прибавляет к результату один. Если этого не нужно, то:

=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000)>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))

или так:

=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000&"")>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))-(СЧЁТЕСЛИ(A1:A5000;"")>1)

или так:

=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000&"")>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))-(СЧЁТЕСЛИ(A1:A5000;"=")>1)

Если я не угадал с причинами "некорректно отрабатывает" и "выдаёт бред", то объясни поподробнее, что конкретно означают эти выражения.

[@Nik]

Формула:
=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000&"")>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))
в экселе 2000 и ХР если, скажем, а яч. А1 и А10 поставить по "1", то результат выдаст 625,75

Формула:
=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000)>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))
корректно работает везде... Чудеса - да и только

[KL]

Формула:
=СУММПРОИЗВ((СЧЁТЕСЛИ(A1:A5000;A1:A5000&"")>1)/СЧЁТЕСЛИ(A1:A5000;A1:A5000&""))
в экселе 2000 и ХР если, скажем, а яч. А1 и А10 поставить по "1", то результат выдаст 625,75

Интересно! Что-то подобное я услышал недели две назад на испанском форуме, но как-то не сопоставил с этим случаем. Возможно существует "bug" в неанглийских версиях Excel.