allsums {magic} | R Documentation |
Returns all rowsums, all columnsums, and all (broken) diagonal sums of a putative magic square.
allsums(m,FUN=sum)
m |
The square to be tested |
FUN |
Function, defaulting to sum , to be applied to the
square rowwise, columnwise, and diagonalwise |
Returns a list of four elements. In the following, “sums” means “the result of applying FUN()”.
rowsums |
All n row sums |
colsums |
All n column sums |
majors |
All n broken major diagonals (northwest-southeast).
First element is the long (unbroken) major diagonal, tested by
is.magic() |
minors |
All n broken minor diagonals (northeast-southwest). First element is the long (unbroken) minor diagonal. |
If FUN()
returns a vector, then the columns of the four elements
are the result of applying FUN()
. See third example below.
Used by is.magic()
et seq.
Robin K. S. Hankin
is.magic
,is.semimagic
,is.panmagic
allsums(magic(7)) allsums(magic(7),FUN=max) allsums(magic(7),FUN=function(x){x[1:2]}) # shows how the minor diagonals are ordered: first [1,n] to [n,1] then # [1,n+1] to [n,2] etc. allsums(magic.prime(7),sort) # beware! compare apply(magic(7),1,sort) with apply(magic(7),2,sort)