Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Describe

Fit

Статистика

 

Подключение библиотеки осуществляется командой with(stats).
>with(stats);

Библиотека Описание
importdata импорт данных из файла
anova вариационный анализ
describe cтатистические данные
fit аппроксимация
random cлучайные значения
statevalf численная оценка
statplots графика
transform преобразования данных

 

Рассмотрим функцию, предназначенную для нахождения корреляционных

отношений и для аппроксимации данных выбранными зависимостями с использованием метода наименьших квадратов.

fit[leastsquare[[x,y]]]([[dataX], [dataY]]);

По умолчанию система приближает зависимость к уравнению прямой линии
Пример
>fit[leastsquare[[x, y]]]([[10, 15, 17,19], [3, 4, 5, 6]]);

Можно самостоятельно задать вид уравнения, к которому необходимо приблизить зависимость.

Пусть наша зависимость выглядит следующим образом
>eq:=y=z*x^2+b*x+c;

Тогда
>fit[leastsquare[[x, y], eq]]([[10, 15, 17,19], [3, 4, 5, 6]]);

 

Решим задачу по отысканию вида функциональной зависимости, сформулированную нами для разбора подобного примера в электронных таблицах Excel.

Построим модель зависимости рентабельности работы предприятия (y) от удельного веса рабочих в структуре персонала (x1), удельного веса покупных изделий (x2), коэффициента сменности оборудования (x3), среднегодовой численности персонала (x4), среднегодовой стоимости основных производственных фондов (x5). Предположим линейную функциональную зависимость вида

y= m1x1+ m2x2+ m3x3+ m4x4+ m5x5+b

В виде массивов введем данные:

удельный вес рабочих в структуре персонала (X1);

удельный вес покупных изделий (X2);

коэффициент сменности оборудования (X3);

среднегодовая численность персонала (X4);

среднегодовая стоимость основных производственных фондов (X5);

рентабельность работы предприятия (Y).

 

> fit[leastsquare[[x1,x2,x3,x4,x5,y]]]([X1,X2,X3,X4,X5,Y]);

> evalf(%,5);

Коэффициенты, полученные в Maple и Excel, совпадают, что говорит о достоверности результатов и возможности использования любого из этих программных продуктов.

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

Функция Описание
coefficientofvariation коэффициент вариации
сount число элементов
сovariance линейная ковариация
geometricmean среднее геометрическое
linearcorrelation линейная корреляция
mean среднее арифметическое
median медиана
quadraticmean квадратичное среднее арифметическое
standarddeviation стандартное отклонение
variance дисперсия

 

Покажем на примере работу некоторых функций

>data1:=[1,2,3]:

>data2:=[3,5,7]:

>data3:=[7,5,3]:

>data4:=[1,2,3,4,5]:

>data5:=[0,5,-6,1,1]:


>describe[linearcorrelation](data1,data2);

>describe[linearcorrelation](data1,data3);

-1

>describe[linearcorrelation](data4,data5);

>evalf(%);

-0.07980868848

>describe[coefficientofvariation](data5);

>describe[count](data5);

>describe[covariance](data4,data5);

>describe[geometricmean](data1):evalf(%);

1.817120593

>describe[mean](data3):evalf(%);

5.

>describe[median](data4):evalf(%);

3.

>describe[quadraticmean](data4):evalf(%);

3.316624790

>describe[standartdeviation](data4):evalf(%);

1.414213562

>describe[variance](data4):evalf(%);

2.

 

<== предыдущая лекция | следующая лекция ==>
Пусть время работы на устройствах I, II, III, IV составляет соответственно 84, 42, 21 и 42 часа | Финансы
Поделиться с друзьями:


Дата добавления: 2014-01-05; Просмотров: 338; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.012 сек.