Relating diameter and mean curvature for submanifolds of Euclidean space