restart : with(stats):with(statplots);

NiM3LkkoYm94cGxvdEc2IkkqaGlzdG9ncmFtR0YlSSxzY2F0dGVycGxvdEdGJUkneHNjYWxlR0YlSSd4c2hpZnRHRiVJK3h5ZXhjaGFuZ2VHRiVJK3h6ZXhjaGFuZ2VHRiVJJ3lzY2FsZUdGJUkneXNoaWZ0R0YlSSt5emV4Y2hhbmdlR0YlSSd6c2NhbGVHRiVJJ3pzaGlmdEdGJQ==

data:=[17.79,17.21,16.47,16.27,15.53,14.92,14.72,14.63,14.23,13.70, 14.52,14.46,13.22,11.75,16.31,15.81,14.98,14.30,14.05,13.66];

NiM+SSVkYXRhRzYiNzYkIiV6PCEiIyQiJUA8RikkIiVaO0YpJCIlRjtGKSQiJWA6RikkIiUjXCJGKSQiJXM5RikkIiVqOUYpJCIlQjlGKSQiJXE4RikkIiVfOUYpJCIlWTlGKSQiJUE4RikkIiV2NkYpJCIlSjtGKSQiJSJlIkYpJCIlKVwiRikkIiVJOUYpJCIlMDlGKSQiJW04Rik=

xmean :=describe[mean](data); xmode :=describe[mode](data); xmedian:=describe[median](data); xrange :=describe[range](data);

NiM+SSZ4bWVhbkc2IiQiKysrbCNcIiEiKQ==

NiM+SSZ4bW9kZUc2IjY2JCIlSjshIiMkIiUiZSJGKSQiJSlcIkYpJCIlSTlGKSQiJVo7RikkIiUwOUYpJCIlRjtGKSQiJW04RikkIiVgOkYpJCIlI1wiRikkIiVzOUYpJCIlajlGKSQiJXo8RikkIiVCOUYpJCIlQDxGKSQiJXE4RikkIiVfOUYpJCIlWTlGKSQiJUE4RikkIiV2NkYp

NiM+SSh4bWVkaWFuRzYiJCIrKytdbjkhIik=

NiM+SSd4cmFuZ2VHNiI7JCIldjYhIiMkIiV6PEYp

stdAbw:=describe[standarddeviation](data);

NiM+SSdzdGRBYndHNiIkIisjKVxBJlIiISIq

Quantile16:=describe[quantile[1/10,0.5]](data);

NiM+SStRdWFudGlsZTE2RzYiJCImU00iISIk