savefig('W51_H2CO_2parfittry11_v2_columnvelocity%s.png' % extrastr,bbox_inches='tight')

    pl.figure(3)
    pl.clf()
    pl.rc('font',size=24)
    dens1 = FITSFigure(parcubefile,convention='calabretta',slices=[0],figure=pl.figure(3))
    dens1.show_colorscale(vmin=2,vmax=6,cmap=cmhot)
    dens1.recenter(**zoomargs)
    dens1.colorbar._colorbar_axes.set_ylabel('log$_{10}$(n(H$_2$) cm$^{-3}$)')
    dens1.set_tick_labels_format('dd.d','d.dd')
    #dens1.hide_xaxis_label()
    #dens1.hide_xtick_labels()
    dens1.refresh()
    savefig('W51_H2CO_2parfittry11_v1_justdensity%s.png' % extrastr,bbox_inches='tight')
    dens1.show_markers(np.array(ysos['_Glon'][ysos['Cl1']=='I']),
                       np.array(ysos['_Glat'][ysos['Cl1']=='I']),
                       edgecolor='k',marker='x')
    dens1.show_markers(np.array(masers['GLON']),
                       np.array(masers['GLAT']),
                       marker='+',edgecolor='k')
    dens1.show_markers(glon,glat,marker='+',edgecolor='k')
    dens1.refresh()
    savefig('W51_H2CO_2parfittry11_v1_justdensity%s_withYSOs.png' % extrastr,bbox_inches='tight')

    column1 = 10**parcubefile[0].data[1] * parcubefile[0].data[5]
    column2 = 10**parcubefile[0].data[9] * parcubefile[0].data[13]
    totalcolumn = np.log10(column1 + column2)
    totalcolumn[totalcolumn == 0] = np.nan
    colhdu = fits.PrimaryHDU(data=totalcolumn, header=flatten_header(parcubefile[0].header))

    pl.figure(4)
                                         ysos[0][cl1lt10]['_DEJ2000'],
                                         frame='fk5').galactic
    cl1gt10coords = coordinates.SkyCoord(ysos[0][cl1gt10]['_RAJ2000'],
                                         ysos[0][cl1gt10]['_DEJ2000'],
                                         frame='fk5').galactic

    fig7 = pl.figure(7)
    fig7.clf()
    gray = copy.copy(pl.cm.gray_r)
    gray.set_bad('white')
    gray.set_under('white')
    FMM = FITSFigure(sfmasshdu1e4, figure=fig7, cmap=gray, stretch='log', vmax=99.95)
    FMM.colorbar._colorbar.set_label("Star-Forming ($n>10^4$ cm$^{-3}$) Gas Surface Density\n[$M_{\odot}$ pc$^{-2}$]",
                                     rotation=270, labelpad=50)
    FMM.save(paths.fpath('StarFormingMassMap.pdf'))
    FMM.show_markers(cl1lt10coords.l, cl1lt10coords.b, marker='x', edgecolor='r', zorder=1100, layer='kangx')
    FMM.show_markers(cl1gt10coords.l, cl1gt10coords.b, marker='o', edgecolor='r', zorder=1100, layer='kango')
    FMM.save(paths.fpath('StarFormingMassMap_Kang2009ClassIYSOs.pdf'))
    FMM.remove_layer('kangx')
    FMM.remove_layer('kango')
    FMM.show_contour(sfmasshdu1e4, levels=[100,1000], zorder=1000, smooth=1, colors=['#AA1111','#FF4411','#BB6666'], linewidths=[2,3], alpha=0.7)
    FMM.show_contour(sfmasshdu1e5, levels=[100,1000], zorder=1000, smooth=1, colors=['#1111BB','#1144FF','#6699BB'], linewidths=[2,3], alpha=0.9)
    FMM.save(paths.fpath('StarFormingMassMap_thresholdcontours.pdf'))

    fig8 = pl.figure(8)
    fig8.clf()
    ax8 = fig8.gca()
    ax8.loglog(totalmassmap[~badsfmass1e4 & ok2cm], sfr2cmd[~badsfmass1e4 & ok2cm], 'r.', alpha=0.1)
    ax8.loglog(sfmassmap1e4[~badsfmass1e4 & ok2cm], sfr2cmd[~badsfmass1e4 & ok2cm], 'k.', alpha=0.1)
    ax8.loglog([1,1e4],np.array([1,1e4])*1.2e-8*1e6,'b--', alpha=0.5)
    ax8.loglog([700,2900],[2,900],'g:', alpha=0.7) # by-eye fit to some of the data