Список форумов AmiSite.ru AmiSite.ru
Форум по Ами
 FAQ  •  Поиск  •  Пользователи  •  Группы   •  Регистрация  •  Профиль  •  Войти и проверить личные сообщения  •  Вход
 Поиск близких значений? Следующая тема
Предыдущая тема
Начать новую тему  Ответить на тему
Автор Сообщение
Jackson



Зарегистрирован: 12.08.2013
Сообщения: 18

СообщениеДобавлено: Вс Ноя 09, 2014 1:58 pm Ответить с цитатой Вернуться к началу

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

delta= ATR(50);

for(t=BarCount-100;t<BarCount;t)
{
sm=0;
kol=0;
etalon = C[t];
for(m=BarCount-100;m<BarCount ;m++)
{
if(abs(etalon-C[m])<delta[t])
{
sm += C[m];
kol += 1;
}
}

level[t] = IIf(kol>3,sm/kol,0);
}
Посмотреть профиль Отправить личное сообщение
000
Site Admin


Зарегистрирован: 10.12.2007
Сообщения: 9106

СообщениеДобавлено: Вс Ноя 09, 2014 2:19 pm Ответить с цитатой Вернуться к началу

Вроде типа как то так
Код:
for(t = BarCount - 100; t < BarCount; t++)
{
   sm = 0;
   kol = 0;
   etalon = C[t];
   del = delta[t];
   
   sm1 = IIf(abs(etalon - C) < del, C, 0);
   sm = Cum(sm1);
   kol1 = IIf(abs(etalon - C) < del, 1, 0);
   kol = Cum(kol1);
}

_________________
ceterum censeo carthaginem esse delendam
Удачи. Олег.
Посмотреть профиль Отправить личное сообщение Посетить сайт автора
Jackson



Зарегистрирован: 12.08.2013
Сообщения: 18

СообщениеДобавлено: Пн Ноя 10, 2014 1:52 pm Ответить с цитатой Вернуться к началу

Спасибо, Олег!
Посмотреть профиль Отправить личное сообщение
Показать сообщения:      
Начать новую тему  Ответить на тему


 Перейти:   



Следующая тема
Предыдущая тема
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете вкладывать файлы
Вы не можете скачивать файлы


Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Часовой пояс: GMT + 3

File Attachment © by Meik Sievertsen