Radiation-hydrodynamic calculation of sub-Eddington accretion disks