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