المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : تكرار مصفوفة


ثامر أبو بلقيس
06-12-2014, 01:26 PM
السلام عليكم ورحمة الله وبركاته

كيف يتم تكرار مصفوفة لمرات اختيارية
و احافظ على نفس ترتيب العناصر

مثال :
{ 1, 2, 3 }

عند تكرارها ثلاث مرات تصبح :
{ 1, 2, 3, 1, 2 ,3 ,1, 2, 3 }

سلام:abc_138:

ثامر أبو بلقيس
19-12-2014, 09:23 PM
يرفع لإلغاء 0 مشاركة

ثامر أبو بلقيس
19-12-2014, 09:27 PM
السلام عليكم ورحمة الله وبركاته
من المؤكد أنك تعرف بأن الحل بسيط
و كان بإمكانك كتابة
b ={ 1, 2, 3 }
my_table={}
for x,y in pairs (b) do
Table.Insert(my_table, x, y);
result = Table.Concat(my_table, ",", 1, TABLE_ALL);
end
Dialog.Message("Notice", "{"..result ..","..result.."}");

لكن يمكنك الاطلاع على قسم الشروحات لتطلع على كيفية تكرار المصفوفة
بعدد مرات اختيارية :abc_138:

عبود عبود
19-12-2014, 10:48 PM
السلام عليكم ورحمة الله وبركاته
من المؤكد أنك تعرف بأن الحل بسيط
و كان بإمكانك كتابة
b ={ 1, 2, 3 }
my_table={}
for x,y in pairs (b) do
Table.Insert(my_table, x, y);
result = Table.Concat(my_table, ",", 1, TABLE_ALL);
end
Dialog.Message("Notice", "{"..result ..","..result.."}");

لكن يمكنك الاطلاع على قسم الشروحات لتطلع على كيفية تكرار المصفوفة
بعدد مرات اختيارية :abc_138:

أيضا بدون in pairs فى التكرار تصبح :

--
b ={ 1, 2, 3 }
my_table={}
for x=1,#b do
Table.Insert(my_table, x, b[x]);
result = Table.Concat(my_table, ",", 1, TABLE_ALL);
end
Dialog.Message("Notice", "{"..result ..","..result.."}");



:abc_152:

ثامر أبو بلقيس
19-12-2014, 10:53 PM
بارك الله فيك أستاذي الكريم حلول ذات تنوع مفيد
لفهم آلية عمل الاكواد بالتوظيف الصحيح

أجدت شكرا تقديري :abc_138:

عبود عبود
19-12-2014, 11:04 PM
هل هذه المحاولة للتكرار بعدد محدد من المرات المتمثل فى m صحيحة أيضا ؟ :

--
b ={ 1, 2, 3 }
my_table={}
i=0;
m=6;
repeat
for x=1,#b do
Table.Insert(my_table, x, b[x]);
result = Table.Concat(my_table, ",", 1, TABLE_ALL);
end
i=i+1;
until (i==m)
Dialog.Message("Notice", "{"..result.."}");

:abc_152:

ثامر أبو بلقيس
19-12-2014, 11:07 PM
قمت بنسخه منذ قليل بتعديل قيمة i إلى 0 فسبقتني

حل أجمل بكثير مما طرح في قسم الشروحات بارك الله فيك :abc_050:

عبود عبود
19-12-2014, 11:10 PM
بارك الله فيك

فقط التركيز فى التكرار سواء بــ ربيت أو فور يمكن أن ينفذ أشياء كثيرة

تحياتى لشخصك الكريم :abc_138:

ثامر أبو بلقيس
29-12-2014, 12:36 AM
:abc_138:

my_table = { 1, 2, 3}
result = Table.Concat(my_table, ",", 1, TABLE_ALL);
x = string.rep(result..",", 2)
Dialog.Message("Notice","{"..x.."}");

:abc_138:

عبود عبود
29-12-2014, 08:58 PM
شكرا :abc_152: