R program that creates a 4x4 seed matrix for use with fungibleR