프렉탈 차원 구하기

2001160145 최인설
격자 크기 - 25mm
갯수- 52개
격자크기 - 12.25mm
갯수 - 188개
격자크기 - 6.125mm
갯수 - 718개

data={{0, Log[52]},{Log[1/2],Log[188]}, {Log[1/4],Log[718]}}
line=Fit[data,{1,x},x]
show[ListPlot[data, PlotStyle ->Red, AspectRatio -> Automatic]]