Rotate an image 90, 180, 270, or 360 degrees counterclockwise.
Examples
img <- array(runif(1000),dim=c(10,10,3))
ImgRotate(img, 270)
#> , , 1
#>
#> [,1] [,2] [,3] [,4] [,5] [,6]
#> [1,] 0.50470149 0.8153851 0.3007906 0.338976752 0.261675975 0.20471419
#> [2,] 0.05643296 0.8565464 0.7954523 0.174447987 0.900795097 0.19067708
#> [3,] 0.99288599 0.5794405 0.4415028 0.710390240 0.127929294 0.05959637
#> [4,] 0.32039748 0.7065450 0.2977282 0.472390555 0.793292239 0.18374268
#> [5,] 0.17027353 0.4347734 0.1596692 0.515386662 0.470056745 0.18314236
#> [6,] 0.55701516 0.7349602 0.8371933 0.358771694 0.575283261 0.36017442
#> [7,] 0.29712148 0.7973749 0.3132402 0.004782714 0.960247952 0.50716535
#> [8,] 0.44122275 0.5069933 0.3220504 0.541803588 0.007717786 0.54008123
#> [9,] 0.35276158 0.7726564 0.6179344 0.531200918 0.558247820 0.14674929
#> [10,] 0.31705243 0.1798191 0.6412468 0.556807929 0.592392179 0.23041065
#> [,7] [,8] [,9] [,10]
#> [1,] 0.54819581 0.69967592 0.7239449 0.565237696
#> [2,] 0.74944687 0.96258621 0.4379894 0.612298275
#> [3,] 0.72863479 0.95893178 0.8671914 0.002746613
#> [4,] 0.75237069 0.99899843 0.2116605 0.209897056
#> [5,] 0.55358666 0.24750355 0.9770864 0.819404803
#> [6,] 0.78986984 0.31836966 0.5310853 0.567486525
#> [7,] 0.43243216 0.04913931 0.1326922 0.882718715
#> [8,] 0.60671924 0.17130661 0.0740649 0.740243047
#> [9,] 0.04177081 0.69148547 0.2749798 0.191095365
#> [10,] 0.77055406 0.19635354 0.2191664 0.568876429
#>
#> , , 2
#>
#> [,1] [,2] [,3] [,4] [,5] [,6]
#> [1,] 0.1695568 0.213191564 0.975488343 0.900469557 0.80016042 0.25267990
#> [2,] 0.7278536 0.202629307 0.197443428 0.961857522 0.86889444 0.60283836
#> [3,] 0.5573554 0.746440599 0.002799502 0.298779080 0.24095570 0.77017240
#> [4,] 0.8763058 0.008667036 0.854284933 0.006351969 0.06946849 0.03046822
#> [5,] 0.2392725 0.446794129 0.662828473 0.118618327 0.23333757 0.46103438
#> [6,] 0.1393735 0.417558082 0.278404820 0.813694608 0.64163523 0.49608157
#> [7,] 0.7840897 0.387724460 0.109371012 0.783965759 0.23760796 0.66141659
#> [8,] 0.5511907 0.169058346 0.142266235 0.011389573 0.85162734 0.12518526
#> [9,] 0.2738643 0.015426659 0.786650366 0.210555644 0.43134276 0.21561704
#> [10,] 0.1955936 0.374901399 0.912664050 0.949377185 0.52728573 0.61640178
#> [,7] [,8] [,9] [,10]
#> [1,] 0.87399673 0.25686465 0.06105253 0.48170966
#> [2,] 0.35561603 0.26959761 0.48126618 0.71742837
#> [3,] 0.38881084 0.67864955 0.88395291 0.94163981
#> [4,] 0.38652830 0.74297420 0.27717293 0.63373123
#> [5,] 0.82052394 0.23125576 0.24009684 0.07787480
#> [6,] 0.30238305 0.01781234 0.47990096 0.78668204
#> [7,] 0.05954834 0.94635740 0.92487696 0.88400350
#> [8,] 0.64433648 0.04733006 0.78154087 0.07337532
#> [9,] 0.08931378 0.79841869 0.88301925 0.98461100
#> [10,] 0.19250876 0.11429048 0.68201383 0.43777554
#>
#> , , 3
#>
#> [,1] [,2] [,3] [,4] [,5] [,6]
#> [1,] 0.6807750950 0.6882927 0.59973014 0.99264574 0.3246915 0.03554333
#> [2,] 0.0002546357 0.6669803 0.62780270 0.78654770 0.5601626 0.46899833
#> [3,] 0.0827425360 0.8658142 0.61220263 0.97473866 0.6328870 0.57588941
#> [4,] 0.3798746092 0.1852638 0.18170383 0.03594893 0.3529450 0.60002218
#> [5,] 0.6114853877 0.6607540 0.98126918 0.46318602 0.2577017 0.45528696
#> [6,] 0.3688861453 0.1701590 0.71113604 0.87504941 0.1376339 0.53839543
#> [7,] 0.5699867660 0.1101262 0.22755791 0.91120494 0.1574218 0.64248464
#> [8,] 0.7771545302 0.9931881 0.56506895 0.86869070 0.3469189 0.43036360
#> [9,] 0.7315386019 0.6018545 0.05465071 0.32502242 0.5944341 0.22590183
#> [10,] 0.1461197801 0.2080660 0.67782219 0.94842842 0.5619158 0.38836320
#> [,7] [,8] [,9] [,10]
#> [1,] 0.68604838 0.11987034 0.5185170 0.720683157
#> [2,] 0.09460931 0.31766135 0.0336632 0.101195886
#> [3,] 0.21548135 0.04771096 0.7270860 0.745991436
#> [4,] 0.58382259 0.67818732 0.6918225 0.296739644
#> [5,] 0.67457877 0.01825314 0.3287975 0.942388556
#> [6,] 0.88627934 0.76244552 0.5508937 0.641407421
#> [7,] 0.98619807 0.60711350 0.1710565 0.687106324
#> [8,] 0.95923934 0.28488588 0.7136287 0.009253807
#> [9,] 0.28150084 0.41076447 0.2109319 0.514865268
#> [10,] 0.53919512 0.35442880 0.8218976 0.791480505
#>