Anonymous user
Convex hull: Difference between revisions
→{{header|J}}
(→{{header|Python}}: add lib header for Shapely) |
|||
Line 774:
<lang J>counterclockwise =: ({. , }. /: 12 o. }. - {.) @ /:~
crossproduct =: 11
removeinner =: #~ (1 , (0 > 3 crossproduct\ ]) , 1:)
hull =: [: removeinner^:_ counterclockwise</lang>
Line 781:
<lang J> hull 16j3 12j17 0j6 _4j_6 16j6 16j_7 16j_3 17j_4 5j19 19j_8 3j16 12j13 3j_4 17j5 _3j15 _3j_9 0j11 _9j_3 _4j_2 12j10
_9j_3 _3j_9 19j_8 17j5 12j17 5j19 _3j15
] A =: ~. 20 2 ?.@$ 9
0 2
1 3
2 1
4 1
8 7
3 5
4 8
7 5
6 1
2 6
1 7
0 1
6 8
4 0
8 6
7 6
5 8
0 4
5 3
hull&.:(+.inv"1) A
0 1
4 0
6 1
8 6
8 7
6 8
4 8
1 7
0 4
</lang>
=={{header|Java}}==
| |||