لحساب المتوسط الرباعي (quarterly average) لكل ثلاث قيم في مصفوفة (array)، يمكنك استخدام حلقة تكرارية (for loop) للانتقال بين القيم. هناك طريقتان لتحقيق ذلك، إما عن طريق تقسيم القيم إلى مجموعات من ثلاثة، أو عن طريق تجميع القيم الثلاثة وحساب المتوسط النهائي. في هذا المثال، سنقوم بتجميع القيم الثلاثة وحساب المتوسط النهائي. هذا مثال لكيفية تنفيذ ذلك باستخدام حلقة تكرارية في لغة R:
R# تعريف المصفوفة مثالاً
monthly_data <- c(10, 15, 20, 25, 30, 35, 40, 45, 50, 55, 60, 65, 70, 75, 80, 85, 90, 95, 100, 105, 110, 115, 120, 125, 130, 135, 140, 145, 150, 155, 160, 165, 170, 175, 180, 185, 190, 195, 200, 205, 210, 215, 220, 225, 230, 235, 240, 245, 250, 255, 260, 265, 270, 275, 280, 285, 290, 295, 300, 305, 310, 315, 320, 325, 330, 335, 340, 345, 350, 355, 360, 365, 370, 375, 380, 385, 390, 395, 400, 405, 410, 415, 420, 425, 430, 435, 440, 445, 450, 455, 460, 465, 470, 475, 480, 485, 490, 495, 500, 505, 510, 515, 520, 525, 530, 535, 540, 545, 550, 555, 560, 565, 570, 575, 580, 585, 590, 595, 600, 605, 610, 615, 620, 625, 630, 635, 640, 645, 650, 655, 660, 665, 670, 675, 680, 685, 690, 695, 700, 705, 710, 715, 720, 725, 730, 735, 740, 745, 750, 755, 760, 765, 770, 775, 780, 785, 790, 795, 800, 805, 810, 815, 820)
# تعريف متغير لحفظ المتوسطات الرباعية
quarterly_averages <- c()
# حلقة تكرارية لحساب المتوسطات الرباعية
for (i in seq(1, length(monthly_data), by=3)) {
quarter_average <- mean(monthly_data[i:(i+2)])
quarterly_averages <- c(quarterly_averages, quarter_average)
}
# طباعة المتوسطات الرباعية
print(quarterly_averages)
في هذا المثال، قمنا بتقسيم المصفوفة monthly_data
إلى مجموعات من ثلاثة قيم، وحسبنا المتوسط لكل مجموعة، ثم قمنا بطباعة المتوسطات الرباعية. يمكنك تغيير المصفوفة monthly_data
والتعديل على الحلقة التكرارية لتناسب بياناتك الفعلية.
المزيد من المعلومات
بالتأكيد! يمكننا إضافة المزيد من المعلومات لتوضيح الحلقة التكرارية وكيفية عملها في هذا السياق:
-
في هذا السياق، نقوم بتحديد متغير
quarterly_averages
كمتغير فارغ، حيث سيتم تخزين المتوسطات الرباعية فيه. -
يتم استخدام حلقة تكرارية
for
للانتقال عبر القيم في المصفوفةmonthly_data
. تستخدم الحلقةseq
لتوليد تسلسل من الفهرسات التي تمثل بداية كل فترة رباعية (ثلاثة أشهر). -
داخل كل تكرار من الحلقة، يتم حساب المتوسط الرباعي باستخدام الدالة
mean
على القيم الثلاثة المتتالية، ويتم تخزين هذا المتوسط في المتغيرquarter_average
. -
المتوسط الرباعي الحالي يتم إضافته إلى المصفوفة
quarterly_averages
باستخدام الدالةc
لإنشاء مصفوفة جديدة تحتوي على جميع المتوسطات الرباعية حتى الآن. -
في النهاية، سيتم طباعة المصفوفة
quarterly_averages
التي تحتوي على المتوسطات الرباعية لكل ثلاثة أشهر.
هذا الحل يمكن تعديله بسهولة لاستخدامه مع بيانات حقيقية، عن طريق استبدال المصفوفة monthly_data
بالمصفوفة الخاصة بك وضبط المتغير quarterly_averages
والحلقة التكرارية وفقًا لاحتياجات البيانات الفعلية.