?

Log in

No account? Create an account

Предыдущий пост Поделиться Следующий пост
Методика быстрого поиска дубликатов - 1
Веселый
chispa1707
Я отделяю "сдвиги" от "дубликатов". Сдвиг это - ДОКАЗАННАЯ махинация создателей хронологии.
Дубликат может иметь естественное происхождение. Например, просто совпадение. Бывает и так.
Мы пока что ищем дубликаты.

САМЫЙ ПРОСТОЙ СПОСОБ
Скажем, Вы - астролог, и Вам просто любопытно, что там у нас повторяется каждые 82 года.
Скачиваете мою базу катастроф. Вот здесь: http://www.fayloobmennik.net/5559772
Открываете на вкладке "База" и в колонке W делите год на нужную Вам цифру, именно на 82.
Как выглядит формула, видно в красном кружочке. А Вы тянете выделенную зону за нижний правый уголочек вниз, до конца.



Дотянули? Теперь уменьшите разрядность цифр до двух знаков после запятой.



Теперь копируете выделенный фрагмент, открываете "Блокнот" (есть в каждой Винде) и вставляете в него.
Вставили? Теперь выделяете в Блокноте всё, копируете и вставляете обратно в Эксель. туда же, где взяли.
Зачем? А иначе Эксель будет помнить ВСЕ знаки после запятой, а они Вам не нужны. А Блокнот увидит ТОЛЬКО то, что видите Вы.
Сохранились.

Теперь выделяйте столбец, заходите в Данные, в опцию "Текст по столбцам".



Соглашайтесь с опцией "с разделителями", жмите "Далее", поставьте галочку в строке "запятая" и жмите "готово".



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



Зайдите в Данные, затем в Фильтр, Автофильтр, и выберете фильтром пустые ячейки, чтобы оптом протянуть в них нолик - он нам нужен.
Отожмите фильтр.



Теперь какую бы из цифр внутри фильтра Вы ни выбрали, даты событий этого ряда будут отличаться ровно на 82 года.



Вот результат.



Положим, Вас заинтересовало, а где находится максимум дат, отличающихся на 82 года.
Для этого отжимаем фильтр, выделяем столбик, идем в данные и в "Сводную таблицу", жмем далее, далее и готово.



"Сводная таблица" - прекраснейший инструмент!
И получаем вот такую картинку.



Двойной клик на "ДРОБНАЯ", и слева появится столбец.



Перетаскиваем название выскочившего столбца туда, куда велено. И столбец мигом подожмется.



И еще раз дважды на "ДРОБНАЯ" в списке полей (картинка справа)



Главное мы получили.
Обычно я копирую получившуюся табличку в Блокнот, оттуда переношу в Эксель - отдельно, а этот лист удаляю.
Но можно и прямо на месте график построить (просто щелкнуть на ярлычок "График" вверху), например, такой:
Мы видим две прекрасные аномальные зоны - там дат, отстоящих одна от другой ровно на 82 года - максимум.




Мы возьмем лучшую зону - с дробными значениями от 41 до 49.
Поставим фильтр и зададим два условия:
- больше или равно 41;
- меньше или равно 49.

И нажмем ОК.



Перед нами 5695 дат, подчиняющихся циклу в 82 года. То есть, 19,4 % от общего числа. Это очень даже много.



Работая фильтром, можно глянуть по типам катастроф.
Сначала сделаем так, чтобы фильтр работал во всем поле. Для этого уберем пустой столбец между двумя нашими рабочими столбцами или просто поставим между ними нолик.
И снова установим фильтр. Зададим те же условия - от 41 до 49 включительно, а в третьей слева колонке выберем, например, эпидемии (по условия "содержит э)



И вот перед нами 530 датированных свидетельств об эпидемиях, идущих с щагом примерно 82 года.
Можно просматривать и делать умозаключения.



Завтра постараюсь описать процесс обработки больших массивов. Это чуток сложнее.
Но интереснее.


  • 1
У тебя нет разрыва по датам?

Нет у меня уверенности, например в этом "30 Апреля 792 года Цунами Широта 45° 30' 0" с.ш. Долгота 11° 0' 0" в.д. Италия". Только в Италии? или 800 год "Цунами Широта 36° 12' 0" с.ш. Долгота 23° 12' 0" в.д. Греция". Вот смотри видео для примера:

Цунами?

Это - рядовая ситуация, особенно на ранних этапах хронологии.
В Италии цунами может быть зафиксировано в 1541 году, а в Африке оно же - в 1792.

То цунаме в Одессе было локальное. 15-20 километров по побережью. Источник неизвестен. Сейсмоволны не было. Есть мнения, но не буду озвучивать)

Вам памятник надо поставить только за то...Это же какой объем работ проделан.

Спасибо, Дмитрий.
На самом деле самое сложное не объем работы. а слом собственных шаблонов в голове.
Их у меня - тьма ))) каждый раз ломаешь через не могу.

а зачем такая сложная методика получения остатка от деления, есть же функция =ОСТАТ.

Я ее пока не знаю.
Как это сделать?

в нужной ячейке пишем например =остат(a2;81), а потом как обычно растягиваем на весь диапазон. важно, что название функции идет русскими буквами, а ссылка на ячейку а2 - латиницей.
функция дает остаток от деления первого параметра на второй. причем если делится нацело, то соответственно остаток будет сразу 0.

Погонял этот метод - получается похоже, только у меня дырки образовались, надо базу снова скачать. Ниже Ваш график, построенный не в экселе, сначала с округлением дробной части, потом без округления.

Изображение - savepic.net — сервис хранения изображений

Изображение - savepic.net — сервис хранения изображений

Ну и изменение по годам величины этой самой дробной части, используемой в Вашем методе - 2 изменения тренда, где-то в начале 18 века с уменьшения на рост (первая синяя вертикальная линия 1700 год), потом с началом 2 мировой разрыв и позже снова рост. Разрыв из-за подбора данных, как я понимаю, а первоначальный тренд уменьшения может быть из-за доисторических дат, являющихся выбросами.
Изображение - savepic.net — сервис хранения изображений

По устанавливающейся традиции пишу как делал - подгрузил в R базу в набор с именем kat, обработка:
#уменьшение количества столбцов
ka <- subset(kat, select=c(date,kata,region,text,year))
#формула к столбцу с годами, результат запоминаем в отдельный столбец
ka$per <- ka$year/82
#выделение дробной части в отдельный столбец
ka$frac <- ka$per%%1
#округление до 2 цифр и выделение этих данных в отдельный столбец
ka$rou <- round(ka$frac, digits = 2)

# рисование первых графиков
with(ka, Hist(rou, scale="frequency", breaks=100, col="darkgray"))
with(ka, Hist(frac, scale="frequency", breaks=100, col="darkgray"))
#последнего
scatterplot(rou~year, reg.line=lm, smooth=TRUE, spread=TRUE, id.method='mahal', id.n = 2, boxplots='xy', span=0.5,
data=ka)

#добавление вертикальных линий
abline(v=1700,col="blue")



Edited at 2015-12-02 09:43 (UTC)

Что ж, прекрасно.
Заводит блог в ЖЖ, буду делать перепосты.
Хорошо, когда одна проблема решается с разных концов.
На порядок эффективнее.

Не хочу свой блог - мне нечего сказать. Я комментатор.
А про метод Ваш надо подумать.
График по базе 12 вместо 82
Изображение - savepic.net — сервис хранения изображений

По 21

Изображение - savepic.net — сервис хранения изображений

По 60
Изображение - savepic.net — сервис хранения изображений

По 70
Изображение - savepic.net — сервис хранения изображений

По 99
Изображение - savepic.net — сервис хранения изображений

Превосходно!
Сделаю перепост.
Должны быть общие для всего ряда арифметические (даже не математические) закономерности.

  • 1