كيفية استخدام وظيفة linest في vba (مع مثال)

يمكنك استخدام أسلوب LinEst في VBA لملاءمة نموذج الانحدار الخطي.

تستخدم هذه الوظيفة بناء الجملة الأساسي التالي:

 LinEst(Arg1, Arg2, Arg3, Arg4)

ذهب:

• Arg1 : مجموعة من قيم y
• Arg2 : مجموعة القيم x
• Arg3 (اختياري) : TRUE = احسب الاعتراض بشكل طبيعي، FALSE = فرض الاعتراض على الصفر
• Arg4 (اختياري) : TRUE = حساب إحصائيات الانحدار الإضافية، FALSE = حساب المعاملات فقط

يوضح المثال التالي كيفية استخدام أسلوب LinEst لملاءمة نموذج الانحدار عمليًا في VBA.

مثال: كيفية استخدام الدالة LinEst في VBA

لنفترض أن لدينا مجموعة البيانات التالية التي تحتوي على متغير التوقع (x) ومتغير الاستجابة (y):

يمكننا إنشاء الماكرو التالي الذي يستخدم طريقة LinEst لملاءمة نموذج الانحدار الخطي البسيط لمجموعة البيانات هذه:

 Sub UseLinEst()
Range(" D1:E1 ") = WorksheetFunction.LinEst(Range(" B2:B15 "), Range(" A2:A15 "))
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

تمثل القيم الناتجة معاملات نموذج الانحدار:

• معامل β ₀ هو 3.52169 .
• معامل _β1 هو 0.693717 .

باستخدام هذه القيم يمكننا كتابة معادلة نموذج الانحدار البسيط هذا:

ص = 3.52169 + 0.693717(س)

نفسر هذا على أنه يعني أن كل زيادة إضافية بمقدار وحدة واحدة في متغير التوقع x ترتبط بمتوسط زيادة قدره 0.693717 في متغير الاستجابة y.

نفسر المصطلح الأصلي على أنه يعني أنه عندما تكون x صفرًا، فإن متوسط قيمة y هو 3.52169 .

إذا أردنا استخدام طريقة LinEst لإنتاج إحصائيات انحدار إضافية، فيمكننا استخدام الصيغة التالية:

 Sub UseLinEst()
Range(" D1:E5 ") = WorksheetFunction.LinEst(Range(" B2:B15 "), Range(" A2:A15 "), True, True)
End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

توفر لقطة الشاشة التالية شرحًا لكل قيمة في النتيجة:

من خلال توفير True للوسيطة الأخيرة لطريقة LinEst ، يمكننا حساب العديد من إحصائيات الانحدار الإضافية.

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

فبا: كيفية تصنيف قائمة القيم
فبا: كيفية حساب الانحراف المعياري للنطاق
فبا: كيفية حساب المتوسط المرجح