Na podzim roku 2024 byl na Václavském náměstí proveden záchranný archeologický výzkum vedený doktorem Petrem tarcem z MHMP. Na místě byl odebrán profil k účelům geoarcheologickým analýz. V jeho stratigrafii byla identifikována vrstva ““Dark Earth”“.
raw=read.table("barvy2.txt", header = T, sep="\t", dec=",", check.names= F)
raw$soil_color=with(raw, munsell2rgb(hue, value, chroma))
depths(raw)= id~top+bottom
hzdesgnname(raw)="name"
plotSPC(raw, name.style="center-center", width=0.25, axis.line.offset=-5)
You can also embed plots, for example:
Note that the echo = FALSE parameter was added to the
code chunk to prevent printing of the R code that generated the
plot.