A perfect cube of order 6 originally due to Trump
data(perfectcube6)
data(perfectcube6) is.perfect(perfectcube6) is.magichypercube(perfectcube6[2:5,2:5,2:5])
Run the code above in your browser using DataLab