Nastavak price o fraktalimaKako je počela u mom slučaju:
http://www.elitesecurity.org/t...izuelizacija-logickih-funkcija
U nastavku sam vršio neke eksperimente sa prostim brojevima i I,ILI,EKSILI rešetkama (nazovimo ih tako, dobijaju se kada se gorenavedene logičke funkcije primene na skup prirodnih brojeva). Poznato je otprilike šta se dobija kada se napravi grafik uređenih parova prirodnih brojeva i prostih brojeva. A šta se dobija kada se napravi grafik uređenih parova prirodnih brojeva i logičkih funkcija nad prirodnim brojevima.
Za one koji imaju program „Mathematica“ ostavljam formule da sami vrše ispitivanja, za ostale sam pripremio grafike za download.
Download grafika logickih funkcija i prostih brojeva
Logičke funkcije vizuelizovane:
Code:
ListPlot[Table[{i, BitXor[i, j]}, {i, 64}, {j, 64}]]
ListPlot[Table[{i, BitAnd[i, j]}, {i, 64}, {j, 64}]]
ListPlot[Table[{i, BitOr[i, j]}, {i, 64}, {j, 64}]]
ListPlot[Table[{i, BitXor[i, j]}, {i, 64}, {j, 64}]]
ListPlot[Table[{i, BitAnd[i, j]}, {i, 64}, {j, 64}]]
ListPlot[Table[{i, BitOr[i, j]}, {i, 64}, {j, 64}]]
Prosti brojevi nad rešetkama logičkih funkcija.
Code:
ListPlot[Table[{i, BitAnd[i, Prime[i]]}, {i, 1000}]]
ListPlot[Table[{i, BitOr[i, Prime[i]]}, {i, 1000}]]
ListPlot[Table[{i, BitXor[i, Prime[i]]}, {i, 1000}]]
ListPlot[Table[{i, BitAnd[i, Prime[i]]}, {i, 1000}]]
ListPlot[Table[{i, BitOr[i, Prime[i]]}, {i, 1000}]]
ListPlot[Table[{i, BitXor[i, Prime[i]]}, {i, 1000}]]
PS: Moram da skrenem pažnju, mada će nekima biti očigledno odmah, da fraktalnost u graficima potiče od logičkih funkcija.
[Ovu poruku je menjao fprlja dana 18.12.2011. u 22:43 GMT+1]
