Compute the inscribed sphere of a geometric region.
Insphere[{p1, …, pn + 1}]
Insphere[poly]
Insphere[Disk[]]
→
Insphere::indep: Insphere does not exist for Disk[{0, 0}].
Insphere[Disk[{0, 0}]]Insphere[Simplex[{{0, 0}, {4, 0}, {0, 3}}]]
→ Sphere[{1, 1}, 1]