Witam, mam takie zadanie:
Zdefiniować "pure function" , która dla argumentu n wykona następujące czynności :
a) utworzy listę złożoną z n podlist o trzech elementach : kolejne potęgi \(\displaystyle{ \lbrace2^i, 3^i, 4^i\rbrace}\),
np. dla\(\displaystyle{ n = 4}\) dostaniemy listę \(\displaystyle{ \lbrace \lbrace2, 3, 4\rbrace, \lbrace4, 9, 16\rbrace, \lbrace8, 27, 64\rbrace, \lbrace16, 81, 256\rbrace \rbrace}\) ;
b) na podstawie powyższej listy utworzy
nową listę złożoną z trzech podlist o \(\displaystyle{ n}\) elementach
(elementy nowej pierwszej podlisty to elementy stojace na pierwszym miejscu każdej
podlisty listy wyjściowej, itd., np. dla powyższej listy
dostaniemy : \(\displaystyle{ \lbrace \lbrace2, 4, 8, 16 \rbrace, \lbrace 3, 9, 27, 81 \rbrace, \lbrace 4, 16, 64, 256 \rbrace \rbrace}\))
Chodzi mi dokładnie o podpunkt b), nie wiem jakiej funkcji użyć, żeby stworzyć taką listę złożoną jak w przykładzie.
[Mathematica] Listy złożone
- JakimPL
- Użytkownik
- Posty: 2401
- Rejestracja: 25 mar 2010, o 12:15
- Płeć: Mężczyzna
- Lokalizacja: Katowice
- Podziękował: 43 razy
- Pomógł: 459 razy
[Mathematica] Listy złożone
Moja propozycja z wykorzystaniem
Pozdrawiam.
All
:Kod: Zaznacz cały
p := Table[Table[i^k, {i, 2, 4}], {k, 1, #}] &
q := Table[p[#][[All, i]], {i, 1, 3}] &