Posts

Showing posts from January 17, 2019

Длинноусые

Image
Эта статья — о подотряде двукрылых насекомых. О подотряде прямокрылых см. длинноусые прямокрылые. Длинноусые Bibio lanigerus ( Bibionidae ) Научная классификация промежуточные ранги Домен:  Эукариоты Царство:  Животные Подцарство :  Эуметазои Без ранга :  Двусторонне-симметричные Без ранга :  Первичноротые Без ранга :  Линяющие Без ранга :  Panarthropoda Тип:  Членистоногие Подтип :  Трахейнодышащие Надкласс :  Шестиногие Класс:  Насекомые Подкласс :  Крылатые насекомые Инфракласс :  Новокрылые насекомые Клада :  Насекомые с полным превращением Надотряд :  Antliophora Отряд:  Двукрылые Подотряд :  Длинноусые Международное научное название Nematocera Schiner, 1862 Инфраотряды Tipulomorpha Psychodomorpha Ptychopteromorpha Culicomorpha Blephariceromorpha Bibionomorpha Axymyiomorpha Систематика на Викивидах Изображения на Викискладе

Generate this sequence more efficiently

Image
1 $begingroup$ Is there a more effecient way to generate the sequence shown below. createOrder[n_] := Which[OddQ[n], Join[Table[2 i - 1, {i, 1, (n + 1)/2}],Reverse@Table[2 i, {i, 1, (n + 1)/2}]], EvenQ[n], Join[Table[2 i - 1, {i, 1, n/2 + 1}],Reverse@Table[2 i, {i, 1, n/2}]]] createOrder[#] & /@ Range[8] // MatrixForm table sequence share | improve this question asked 45 mins ago Hubble07 Hubble07 2,971 7 21 $endgroup$ add a comment