| 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)