- This topic has 2개 답변, 2명 참여, and was last updated 5 years, 10 months 전에 by
.
-
글
-
-
프로그램을 다음과 같이 짰는데
실행시켜보면 ytitle이 왼쪽으로 치우쳐서 반이 짤려서 보입니다.
yrange에 소수점을 빼면 ytitle은 나오는데 그래프가 안그려지고,,
뭐가 문제일까요 ?pro asmt111
col=[‘black’,’red’,’green’,’blue’,’orange’,’cyan’]
T=[10000,9000,8000,7000,6000,5000]
x=findgen(901)+100
y=fltarr(6,901)
for i=0,5 do begin
y[i,*]=2.*!pi*(!const.c)^2.*!const.h/$
(x*10.^(-9.))^5.*(1./(exp((!const.h*!const.c)/$
((x*10.^(-9.))*!const.k*t[i]))-1.))
endfor
plot,x,y,thick=2,symsize=2,/nodata, $
title=’Blackbody radiation created by HTAHN’, $
xtitle=’Wavelength [nm]’, ytitle=’Intensity [J s!U-1!nm!U-3!n]’, $
background=cgcolor(‘white’), color=cgcolor(‘black’), $
yrange=[0,1.5*10^15.], charsize=1.2
for i=0,5 do oplot,x,y[i,*],thick=2, color=cgcolor(col[i])
xyouts,700,1.35*10^15.,’Black: 10,000 K’, color=cgcolor(‘black’)
xyouts,700,1.25*10^15.,’Red: 9,000 K’, color=cgcolor(‘black’)
xyouts,700,1.15*10^15.,’Green: 8,000 K’, color=cgcolor(‘black’)
xyouts,700,1.05*10^15.,’Blue: 7,000 K’, color=cgcolor(‘black’)
xyouts,700,0.95*10^15.,’Orange: 6,000 K’, color=cgcolor(‘black’)
xyouts,700,0.85*10^15.,’Cyan: 5,000 K’, color=cgcolor(‘black’)
a=tvrd(/true)
write_jpeg,’asmt111.jpg’,a,/true
end -
여백을 적절히 조절하면 해결될 것 같습니다. PLOT 프로시저에서 좌우 여백은 XMARGIN, 상하 여백은 YMARGIN 키워드로 조정합니다. 플롯으로 나타나는 XY축 사각형 바깥 부분이 여백이 됩니다. 지금과 같은 경우에는 플롯의 좌측 여백을 조절하면 됩니다. 사용하신 PLOT 명령에 XMARGIN 키워드를 대략 다음과 같이 추가해보세요.
PLOT, ~~~~~~, XMARGIN=[12, 3], ~~~~~~
원래 XMARGIN의 디폴트값은 [10, 3]입니다. 두 숫자는 좌측 및 우측 여백의 크기를 일반적인 글자의 크기 단위로 나타낸 것입니다. 따라서 좌측 여백의 크기의 디폴트값인 10을 좀 더 늘려주면 Y축 타이틀 문자가 잘 보일 수 있는 충분한 여백의 확보가 가능합니다.
-
-
