4 lines
115 B
Text
4 lines
115 B
Text
mean := proc( a :: indexable )
|
|
local i;
|
|
Normalizer( add( i, i in a ) / numelems( a ) )
|
|
end proc:
|