add subsets(s::Set, n)

Added function subsets( s::Set, n::Int ) which returns a set of all subsets of s of size n.