File:I Ching King Wen Hexagram Array Plot.png
Original file (285 × 1,827 pixels, file size: 10 KB, MIME type: image/png)
 | This is a file from the Wikimedia Commons. Information from its description page there is shown below. Commons is a freely licensed media file repository. You can help. |
Summary
| Description |
English: (* I Ching King Wen Sequence,
encoded from Wikipedia figure: https://en.wikipedia.org/wiki/King_Wen_sequence#Dual_hexagrams Arbitrarily designate solid line as 1, and broken line as 0, reading hexagrams from left to right for numbers on the left, and from right to left for numbers on the right. Alternative choices will lead to a color swap or a reflection of the plot mirrored over a central vertical line. *) x[1] = Template:1, 1, 1, 1, 1, 1; x[2] = {0, 0, 0, 0, 0, 0}; x[3] = {1, 0, 0, 0, 1, 0}; x[4] = {0, 1, 0, 0, 0, 1}; x[5] = {1, 1, 1, 0, 1, 0}; x[6] = {0, 1, 0, 1, 1, 1}; x[7] = {0, 1, 0, 0, 0, 0}; x[8] = {0, 0, 0, 0, 1, 0}; x[9] = {1, 1, 1, 0, 1, 1}; x[10] = {1, 1, 0, 1, 1, 1}; x[11] = {1, 1, 1, 0, 0, 0}; x[12] = {0, 0, 0, 1, 1, 1}; x[13] = {1, 0, 1, 1, 1, 1}; x[14] = {1, 1, 1, 1, 0, 1}; x[15] = {0, 0, 1, 0, 0, 0}; x[16] = {0, 0, 0, 1, 0, 0}; x[17] = {1, 0, 0, 1, 1, 0}; x[18] = {0, 1, 1, 0, 0, 1}; x[19] = {1, 1, 0, 0, 0, 0}; x[20] = {0, 0, 0, 0, 1, 1}; x[21] = {1, 0, 0, 1, 0, 1}; x[22] = {1, 0, 1, 0, 0, 1}; x[23] = {0, 0, 0, 0, 0, 1}; x[24] = {1, 0, 0, 0, 0, 0}; x[25] = {1, 0, 0, 1, 1, 1}; x[26] = {1, 1, 1, 0, 0, 1}; x[27] = {1, 0, 0, 0, 0, 1}; x[28] = {0, 1, 1, 1, 1, 0}; x[29] = {0, 1, 0, 0, 1, 0}; x[30] = {1, 0, 1, 1, 0, 1}; x[31] = {0, 0, 1, 1, 1, 0}; x[32] = {0, 1, 1, 1, 0, 0}; x[33] = {0, 0, 1, 1, 1, 1}; x[34] = {1, 1, 1, 1, 0, 0}; x[35] = {0, 0, 0, 1, 0, 1}; x[36] = {1, 0, 1, 0, 0, 0}; x[37] = {1, 0, 1, 0, 1, 1}; x[38] = {1, 1, 0, 1, 0, 1}; x[39] = {0, 0, 1, 0, 1, 0}; x[40] = {0, 1, 0, 1, 0, 0}; x[41] = {1, 1, 0, 0, 0, 1}; x[42] = {1, 0, 0, 0, 1, 1}; x[43] = {1, 1, 1, 1, 1, 0}; x[44] = {0, 1, 1, 1, 1, 1}; x[45] = {0, 0, 0, 1, 1, 0}; x[46] = {0, 1, 1, 0, 0, 0}; x[47] = {0, 1, 0, 1, 1, 0}; x[48] = {0, 1, 1, 0, 1, 0}; x[49] = {1, 0, 1, 1, 1, 0}; x[50] = {0, 1, 1, 1, 0, 1}; x[51] = {1, 0, 0, 1, 0, 0}; x[52] = {0, 0, 1, 0, 0, 1}; x[53] = {0, 0, 1, 0, 1, 1}; x[54] = {1, 1, 0, 1, 0, 0}; x[55] = {1, 0, 1, 1, 0, 0}; x[56] = {0, 0, 1, 1, 0, 1}; x[57] = {0, 1, 1, 0, 1, 1}; x[58] = {1, 1, 0, 1, 1, 0}; x[59] = {0, 1, 0, 0, 1, 1}; x[60] = {1, 1, 0, 0, 1, 0}; x[61] = {1, 1, 0, 0, 1, 1}; x[62] = {0, 0, 1, 1, 0, 0}; x[63] = {1, 0, 1, 0, 1, 0}; x[64] = {0, 1, 0, 1, 0, 1}; xx = x[1]; For[i = 2, i <= 64, i++, AppendTo[xx, x[i]]] ArrayPlot[xx, ColorRules -> {1 -> Red, 0 -> Blue}, PlotTheme -> "Detailed", ImageSize -> 100] |
| Date | |
| Source | Own work |
| Author | Charles Juvon |
Licensing
- You are free:
- to share – to copy, distribute and transmit the work
- to remix – to adapt the work
- Under the following conditions:
- attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
- share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 22:01, 29 December 2020 | | 285 × 1,827 (10 KB) | Charles Juvon | Uploaded own work with UploadWizard |
File usage
The following page uses this file:
