Nanoporous Titania Synthesized by a Nanoscale Casting Process in Supercritical Carbon Dioxide