OFFSET
1,3
MATHEMATICA
{Table[#[[1]], #[[2]]], Table[#[[2]], #[[1]]]}&/@Partition[Range[20], 2]// Flatten (* Harvey P. Dale, Aug 27 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Jul 17 2007
STATUS
approved