2d:null 2e:["$","title",null,{"children":"Staat van Zuid-Holland: Bos & bomen | T.E. Schouten | Observable"}] 33:Tc2f,md ` #### Natuurdata Nederlandse natuurdata is nogal versnipperd. Er bestaan genoeg datasets,maar de kwaliteit en compleetheid is niet altijd top. Omdat het doel van al de datasets verschilt, verschilt ook de resolutie en de inhoud. Er wordt geen eenduidige definitie van 'bos' gehanteerd. Dit zorgt er voor dat verschillende datasets slecht met elkaar te vergelijken zijn. Zo geeft de de Top10NL^{[[1](#footnote1)]} het landgebruik weer per (deel) perceel. Hierin wordt een onderscheid gemaakt tussen o.a. de klassen *bos: gemengd bos, griend, loofbos, naaldbos, dodenakker met bos, ... * ' Een andere veelgebruikte bron is het Landgebruik Nederland (LGN). Dit bestand rapporteert per 25m² rastercel een van de volgende bosklassen *loofbos, naaldbos, bos in primair bebouwd gebied, bos in secundair bebouwd gebied, bos in hoogveengebid, bos in moerasgebied, ..*. Dit gebeurt op basis van sattelietbeelden. Naast deze twee bronnen bestaat er ook nog o.a. het bomenregister. Hierin wordt op basis van kruinprojecties in poging gedaan om alle individuele bomen in Nederland te karteren. Kortom, veel verschillende invalshoeken. En de beheerders dan? Uit de praktijk blijkt dat ook beheerders zelf geen actuele en complete sets hebben. #### LULUCF Om toch een uitspraak te kunnen doen over de ontwikkeling van het bos-areaal in de Provincie, is het nuttig om één standaard te hanteren. De Food and Agriculture Organization (FAO) van de VN hanteert de volgende definitie: >*Land with tree crown cover (or equivalent stocking level) of more than 10 percent and area of more than 0,5 ha. The trees should be able to reach a minimum height of 5 m at maturity in situ. May consist either of closed forest formations where trees of various storeys and undergrowth cover a high proportion of the ground; or of open forest formations with a continuous vegetation cover in which tree crown cover exceeds 10 percent.* >*Young natural stands and all plantations established for forestry purposes which have yet to reach a crown density of 10 percent or tree height of 5 m are included under forest, as are areas normally forming part of the forest area which are temporarily unstocked as a result of human intervention or natural causes but which are expected to revert to forest.* >*Includes: Forest nurseries and seed orchards that constitute an integral part of the forest; forest roads, cleared tracts, firebreaks and other small open areas within the forest; forest in national parks, nature reserves and other protected areas such as those of special environmental, scientific, historical, cultural or spiritual interest; windbreaks and shelterbelts of trees with an area of more than 0,5 ha and a width of more than 20 m. Rubberwood plantations and cork oak stands are included.* >*Excludes: land predominantly used for agricultural practices* Sinds 2009 vervaardigd Wageningen Environmental Research het LULUCF-bestand: *Land Use, Land-use Change and Forestry* op basis van deze definitie. Dit bestand wordt gerapporteerd richting de EU en is voor ons doeleinde ook erg geschikt. ` 34:Tc72,r1 = { let data = d1 let graph = pie2 const pie = d3.pie() .sort(null) .value(function (d) { return d.occurences; }) const margin = {top: 30, right: 200, bottom: 30, left: 200}; const width = 300, height = 200, radius = 100; const arc = d3.arc() .outerRadius(radius - 10) .innerRadius(60); const outArc = d3.arc() .outerRadius(radius + 40) .innerRadius(radius - 10); const arcTween =function (a) { var i = d3.interpolate(this._current, a); this._current = i(0); return function (t) { return arc(i(t)); }; } d3.select(graph).selectAll('.graphArea').data(['svg']).enter().append("svg") .attr("width", width + margin.left + margin.right) .attr("height", height + margin.top + margin.bottom) .append("g") .attr('class','graphArea') .attr("transform", "translate(" + (margin.left + width / 2) + "," + (margin.top + height / 2 ) + ")"); const pieChart = d3.select(graph).select('.graphArea'); const arcs = pieChart.selectAll(".arc") .data(pie(data)); arcs.enter() .append("g") .attr("class", "arc") .each(function (d) { d3.select(this).append("path") .attr("d", arc) .style("fill",d.data.color) .style("stroke","white") var x = (outArc.centroid(d)[0] +width/2) > width / 2 ? width / 2 : -width / 2; d3.select(this).append("text") .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .attr("dy", ".35em") .attr("fill", "black"); d3.select(this) .append("line") .attr("class", "pend") .attr("stroke", "grey") .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .append("line") .attr("class", "hor") .attr("stroke", "grey") .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }) .merge(arcs) .each(function (d) { d3.select(this) .select("path") .transition() .duration(500) .attrTween("d", arcTween) .style("fill",d.data.color); var x = (outArc.centroid(d)[0] + width/2) > width / 2 ? width / 2 : -width / 2; var anchor = (outArc.centroid(d)[0] +width/2) > width / 2 ?"start":"end"; d3.select(this).select("text") .style("text-anchor",anchor) .attr("dx", ((outArc.centroid(d)[0] +width/2) > width / 2) ?"1em":"-1em") .transition() .duration(500) .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .text(d.data.tag); d3.select(this).select(".pend") .transition() .duration(500) .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .select(".hor") .transition() .duration(500) .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }); arcs.exit().remove(); }35:Tc72,r2 = { let data = d2 let graph = pie1 const pie = d3.pie() .sort(null) .value(function (d) { return d.occurences; }) const margin = {top: 30, right: 200, bottom: 30, left: 200}; const width = 300, height = 200, radius = 100; const arc = d3.arc() .outerRadius(radius - 10) .innerRadius(60); const outArc = d3.arc() .outerRadius(radius + 40) .innerRadius(radius - 10); const arcTween =function (a) { var i = d3.interpolate(this._current, a); this._current = i(0); return function (t) { return arc(i(t)); }; } d3.select(graph).selectAll('.graphArea').data(['svg']).enter().append("svg") .attr("width", width + margin.left + margin.right) .attr("height", height + margin.top + margin.bottom) .append("g") .attr('class','graphArea') .attr("transform", "translate(" + (margin.left + width / 2) + "," + (margin.top + height / 2 ) + ")"); const pieChart = d3.select(graph).select('.graphArea'); const arcs = pieChart.selectAll(".arc") .data(pie(data)); arcs.enter() .append("g") .attr("class", "arc") .each(function (d) { d3.select(this).append("path") .attr("d", arc) .style("fill",d.data.color) .style("stroke","white") var x = (outArc.centroid(d)[0] +width/2) > width / 2 ? width / 2 : -width / 2; d3.select(this).append("text") .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .attr("dy", ".35em") .attr("fill", "black"); d3.select(this) .append("line") .attr("class", "pend") .attr("stroke", "grey") .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .append("line") .attr("class", "hor") .attr("stroke", "grey") .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }) .merge(arcs) .each(function (d) { d3.select(this) .select("path") .transition() .duration(500) .attrTween("d", arcTween) .style("fill",d.data.color); var x = (outArc.centroid(d)[0] + width/2) > width / 2 ? width / 2 : -width / 2; var anchor = (outArc.centroid(d)[0] +width/2) > width / 2 ?"start":"end"; d3.select(this).select("text") .style("text-anchor",anchor) .attr("dx", ((outArc.centroid(d)[0] +width/2) > width / 2) ?"1em":"-1em") .transition() .duration(500) .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .text(d.data.tag); d3.select(this).select(".pend") .transition() .duration(500) .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .select(".hor") .transition() .duration(500) .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }); arcs.exit().remove(); }36:Tc72,r3 = { let data = d4 let graph = pie3 const pie = d3.pie() .sort(null) .value(function (d) { return d.occurences; }) const margin = {top: 30, right: 200, bottom: 30, left: 200}; const width = 300, height = 200, radius = 100; const arc = d3.arc() .outerRadius(radius - 10) .innerRadius(60); const outArc = d3.arc() .outerRadius(radius + 40) .innerRadius(radius - 10); const arcTween =function (a) { var i = d3.interpolate(this._current, a); this._current = i(0); return function (t) { return arc(i(t)); }; } d3.select(graph).selectAll('.graphArea').data(['svg']).enter().append("svg") .attr("width", width + margin.left + margin.right) .attr("height", height + margin.top + margin.bottom) .append("g") .attr('class','graphArea') .attr("transform", "translate(" + (margin.left + width / 2) + "," + (margin.top + height / 2 ) + ")"); const pieChart = d3.select(graph).select('.graphArea'); const arcs = pieChart.selectAll(".arc") .data(pie(data)); arcs.enter() .append("g") .attr("class", "arc") .each(function (d) { d3.select(this).append("path") .attr("d", arc) .style("fill",d.data.color) .style("stroke","white") var x = (outArc.centroid(d)[0] +width/2) > width / 2 ? width / 2 : -width / 2; d3.select(this).append("text") .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .attr("dy", ".35em") .attr("fill", "black"); d3.select(this) .append("line") .attr("class", "pend") .attr("stroke", "grey") .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .append("line") .attr("class", "hor") .attr("stroke", "grey") .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }) .merge(arcs) .each(function (d) { d3.select(this) .select("path") .transition() .duration(500) .attrTween("d", arcTween) .style("fill",d.data.color); var x = (outArc.centroid(d)[0] + width/2) > width / 2 ? width / 2 : -width / 2; var anchor = (outArc.centroid(d)[0] +width/2) > width / 2 ?"start":"end"; d3.select(this).select("text") .style("text-anchor",anchor) .attr("dx", ((outArc.centroid(d)[0] +width/2) > width / 2) ?"1em":"-1em") .transition() .duration(500) .attr("transform", "translate(" +x +","+ outArc.centroid(d)[1] +")") .text(d.data.tag); d3.select(this).select(".pend") .transition() .duration(500) .attr("x1", arc.centroid(d)[0]) .attr("x2", outArc.centroid(d)[0]) .attr("y1", arc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) d3.select(this) .select(".hor") .transition() .duration(500) .attr("x1", outArc.centroid(d)[0]) .attr("x2", x) .attr("y1", outArc.centroid(d)[1]) .attr("y2", outArc.centroid(d)[1]) }); arcs.exit().remove(); }37:[{"id":"1a58ec6e4357d3078aff32a328cf3e42238ac90bbd25853526e0d9a1cc6cb2f8b4422bdfc504fd6abdc6736664a3acc329e44024ddc1869befe1f2ff52392497","href":"https://static.observableusercontent.com/files/1a58ec6e4357d3078aff32a328cf3e42238ac90bbd25853526e0d9a1cc6cb2f8b4422bdfc504fd6abdc6736664a3acc329e44024ddc1869befe1f2ff52392497","name":"lulucf_bos_csv.csv","type":"text/csv","lastModified":1600428780126.064,"size":2601741},{"id":"db1c988db01f0aae8c5fc2a6bd8996be2de9b45cba4fedfe1d182e69f0744a2e05e869f92219f4a24e5a8b506b7a4f80b5dfb54954caea6384c4124b9b4e16fd","href":"https://static.observableusercontent.com/files/db1c988db01f0aae8c5fc2a6bd8996be2de9b45cba4fedfe1d182e69f0744a2e05e869f92219f4a24e5a8b506b7a4f80b5dfb54954caea6384c4124b9b4e16fd","name":"lulucf_4326.geojson","type":"application/geo+json","lastModified":1600420505530.016,"size":13107434},{"id":"15b78203cbc22d898ccc40e4823dc0f020123fb5a33e46e774c3e5e07273f0918b7674a9fda7014f13fa6feb330da24af46742dba4acdab9ec5c43477ab7a41b","href":"https://static.observableusercontent.com/files/15b78203cbc22d898ccc40e4823dc0f020123fb5a33e46e774c3e5e07273f0918b7674a9fda7014f13fa6feb330da24af46742dba4acdab9ec5c43477ab7a41b","name":"Recreatiegebied_Omgevingsverordening_v2.geojson","type":"application/geo+json","lastModified":1600435697233.858,"size":333003},{"id":"579901f0f0fb491a5484e38fdc73d15b9386d6cd68172ff9fb1f786720250d1cf595c83e9e253fb765e3bdbd71c4972b9738f1f830e2299fff39b4f1eeaf41f4","href":"https://static.observableusercontent.com/files/579901f0f0fb491a5484e38fdc73d15b9386d6cd68172ff9fb1f786720250d1cf595c83e9e253fb765e3bdbd71c4972b9738f1f830e2299fff39b4f1eeaf41f4","name":"VRM_LAND_NNN.json","type":"application/json","lastModified":1600842066614.243,"size":5327304}] 31:{"id":"5a3b4c0c07f3fa9a","slug":"pzh-svzh-bos","title":"Staat van Zuid-Holland: Bos & bomen","thumbnail":"c3c770e878070aeff81eec49dca5750b5368d8a66d0b3657b52e4a26d078ed2d","access_level":"public","create_time":"$D2020-09-18T08:04:14.606Z","update_time":"$D2020-11-24T14:06:54.973Z","view_time":null,"first_public_time":"$D2020-09-18T08:51:10.398Z","has_unpublished_edits":null,"fork":false,"stars":0,"starred":false,"owner":{"type":"team","id":"d19a230dabb035d0","login":"thijsschouten","name":"T.E. Schouten","avatar_url":"https://avatars-next.observableusercontent.com/091c69f0b7b396df70696f26f5738dc8c19b50db5102fc472c06d6e7458dd1ec","tier":"starter_2024"},"version":847,"publish_version":847,"role":null,"authored":false,"authors":[{"type":"individual","id":"b8802c07e4374e6f","login":"thijsschouten","name":"T.E. Schouten","avatar_url":"https://avatars-next.observableusercontent.com/091c69f0b7b396df70696f26f5738dc8c19b50db5102fc472c06d6e7458dd1ec","tier":null}],"members":[{"type":"individual","id":"b8802c07e4374e6f","login":"thijsschouten","name":"T.E. Schouten","avatar_url":"https://avatars-next.observableusercontent.com/091c69f0b7b396df70696f26f5738dc8c19b50db5102fc472c06d6e7458dd1ec","tier":null,"role":"editor"}],"comments":[],"custom_thumbnail":false,"trashed":false,"lapsed":null,"subscribed":null,"forks":1,"collection":null,"type":"notebook","body":{"title":"Staat van Zuid-Holland: Bos & bomen","cells":[{"id":0,"value":"md`# Staat van Zuid-Holland: Bos & bomen\n*Dataset: LULUCF - Land Use, Land-Use Change and Forestry \nBron: [Wageningen Environmental Research](https://www.wur.nl/nl/Publicatie-details.htm?publicationId=publication-way-333834313438)* \n`\n","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":24,"value":"$33","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":49,"value":"md `\n---\n## Op de kaart\nOnderstaande kaart geeft het (LULUCF-)bos in de Provincie Zuid-Holland weer. De kaart bestaat uit rastercellen met een resolutie van 25m². Er is een onderscheid aangebracht tussen bos en klein bos. Minimaal 8 aaneengesloten cellen (0.5ha) classificeert als *bos*, kleinere oppervlaktes als *klein bos*.\n`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":176,"value":"viewof type_bos = {\n const _ = select({\n title: \"Inclusief klein bos ( < 0.5 ha )?\",\n options: [\n { value:'', label: \"ja\" },\n { value: 'klein bos', label: \"nee\" },\n ],\n value: 'klein bos'\n });\n return _;\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":440,"value":"viewof extra_layers = checkbox({\n title: \"Kaartlagen\",\n options: [\n { value: \"NNN\", label: \"Natuur Netwerk Nederland (landtypen; uit VRM)\" },\n { value: \"Recreatie\", label: \"Recreatiegebieden (uit omgevingsverordening)\" },\n ],\n // submit: true\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":111,"value":"\nviewof map = {\n const container = html`

`;\n yield container; // Give the container dimensions.\n \n let base = L.tileLayer('https://{s}.basemaps.cartocdn.com/light_all/{z}/{x}/{y}{r}.png', {\n attribution: '© OpenStreetMap contributors © CARTO',\n subdomains: 'abcd',\n maxZoom: 19\n });\n \n const map = container.value = new L.Map(container, {\n layers: [base],\n center: L.latLng(ct.lat, ct.lon),\n zoom: 10,\n });\n \n invalidation.then(() => map.remove());\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":782,"value":"forestLayer = L.geoJson(filtered_forest, {\n fillColor: \"black\",\n fillOpacity: 0.7,\n opacity: 0, \n })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":785,"value":"NNNLayer = L.geoJson(nnn, {\n fillColor: \"#1b9e77\",\n fillOpacity: .3,\n color: \"#1b9e77\",\n opacity: 0,\n weight: 1,\n \n }).bindPopup(function (Layer) {\n return Layer.feature.properties.NAME;\n })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":788,"value":"recLayer = L.geoJson(recreatiegebieden, {\n fillColor: \"#7570b3\",\n fillOpacity: .45,\n color: \"#7570b3\",\n opacity: 0,\n weight: 1, \n }).bindPopup(function (Layer) {\n return Layer.feature.properties.NAME;\n })","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":795,"value":"nnn_on_map = { \n if (extra_layers.indexOf(\"NNN\") > -1) {\n map.addLayer(NNNLayer)\n return true\n } else {\n map.removeLayer(NNNLayer)\n return false\n }\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":839,"value":"rec_on_map = {\n if (extra_layers.indexOf(\"Recreatie\") > -1) {\n map.addLayer(recLayer)\n return true\n } else {\n map.removeLayer(recLayer)\n return false\n }\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":777,"value":"forest_on_map = {\n map.removeLayer(forestLayer)\n forestLayer.addTo(map)\n return true\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":268,"value":"md`Omdat het kleine bos niet meetelt in de FOA-definitie van bos, laten we deze kleine bosjes in het vervolg van het artikel achterwege.`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":224,"value":"md `\n---\n## In cijfers\n\n#### *Hoeveel bos?*\n\nPZH heeft een oppervlak van ongeveer 330 700 ha. Hiervan is 60 700 ha water, de rest land. Op basis van het LULUCF-bestand kunnen we een schatting maken van het bos-opp: ongeveer 10 476 ha. Dat is zo'n ${Math.round(bos_stats.totaal_groot / 330700 * 1000)/10} % van het totale landoppervlak. `","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":645,"value":"pie1 = html `

`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":405,"value":"md` \n#### *Bos binnen het NNN en recreatiegebieden*\n\nHet bos is ligt verspreid door de provincie. Een deel ligt binnen het NNN en een deel in recreatiegebieden. Als we deze onderverdeling hanteren levert dat de volgende verhouding: ${Math.round(bos_area_stats.NNN)} ha bos in het NNN en ${Math.round(bos_area_stats.recreatiegebied)} ha bos in de recreatiegebieden. De overige ${Math.round(bos_area_stats.overig)} ha ligt er buiten.`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":585,"value":"pie2 = html `

`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":659,"value":"md` \n#### *Bos binnen het NNN*\n\nHet totale NNN is ca. 33085 ha groot *(exclusief de grote wateren)*. Hiervan is 6014 ha bos.`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":668,"value":"pie3 = html `

`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":39,"value":"md `---\n## Voetnoten`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":32,"value":"footnote19 = md`1. Top10NL: de topografische bestanden die behoren tot de Basisregistratie Topografie. Gebaseerd op luchtfotografie en eventuele terreinverkenning. https://www.kadaster.nl/zakelijk/producten/geo-informatie/topnl`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":100,"value":"md`---\n## Appendix: code & data`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":423,"value":"md`Leaflet & Map Props`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":427,"value":"recreatiegebieden = FileAttachment(\"Recreatiegebied_Omgevingsverordening_v2.geojson\").json()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":434,"value":"nnn = FileAttachment(\"VRM_LAND_NNN.json\").json()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":122,"value":"ct = ({\n 'lon': 4.42,\n 'lat': 51.995,\n})","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":274,"value":"raw = FileAttachment(\"lulucf_bos_csv.csv\").csv()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":305,"value":"forest_nogeo = raw.slice(1)","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":553,"value":"bos_area_stats = {\n \n let ha = 0.0625\n let d = {\n NNN: 0,\n recreatiegebied: 0,\n overig: 0\n }\n \n Object.values(forest_nogeo).forEach(function(cell) {\n if (cell.type_bos === \"bos\") {\n d[cell.type_gebie] += ha\n }\n });\n \n \n return d\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":286,"value":"bos_stats = {\n \n // One cell = 25m*25m = 625m2 = 0.0625 hectares\n let ha = 0.0625\n let d = {\n totaal: 0,\n totaal_groot: 0,\n totaal_klein: 0\n }\n \n Object.values(forest_nogeo).forEach(function(cell) {\n let key = cell.type_gebied + ' ' + cell.type_bos\n if (cell.type_bos === \"klein bos\") {\n d['totaal_klein'] += ha\n } else {\n d['totaal_groot'] += ha\n }\n if (d.hasOwnProperty(key)) {\n d[key] += ha\n } else {\n d[key] = ha\n }\n d.totaal += ha\n });\n \n \n return d\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":152,"value":"forest_file = FileAttachment(\"lulucf_4326.geojson\").json()","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":174,"value":"filtered_forest = {\n let f = { ...forest_file}\n f.features = []\n\n\n Object.values(forest_file.features).forEach(function(cell) {\n if (cell.properties.type_bos != type_bos) {\n f.features.push(cell)\n }\n });\n return f\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":158,"value":"function style(feature) {\n return {\n fillColor: getColor(feature.properties.type_gebie + feature.properties.type_bos),\n weight: 1,\n opacity: 1,\n fillOpacity: 0.7,\n color: 'rgba(0,0,0,0)',\n };\n}\n","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":159,"value":"function getColor(d) {\n return d > 'overigbos' ? '#b10026' :\n d > 'recreatiegebiedbos' ? '#e31a1c' :\n d > 'recreatiegebiedklein bos' ? '#fc4e2a' :\n d > 'overigklein bos' ? '#fd8d3c' :\n d > 'NNNklein bos' ? '#feb24c' :\n d > 'NNNbos' ? '#fed976' :\n '#78c679';\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":591,"value":"md`## Piechart`","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":598,"value":"d1 = {\n \n let total = bos_area_stats.NNN + bos_area_stats.recreatiegebied + bos_area_stats.overig\n let _nnn = [bos_area_stats.NNN, Math.round(bos_area_stats.NNN/total*100) + \"%\"] \n let _rec = [bos_area_stats.recreatiegebied, Math.round(bos_area_stats.recreatiegebied/total*100) + \"%\"]\n let _overig = [bos_area_stats.overig, Math.round(bos_area_stats.overig/total*100) + \"%\"]\n \n return [\n {\"tag\":\"NNN \" + _nnn[1],\"occurences\":_nnn[0],\"color\":\"rgb(168,219,168)\"},\n {\"tag\":\"Recreatiegebied \" + _rec[1],\"occurences\":_rec[0],\"color\":\"rgb(121,189,154)\"},\n {\"tag\":\"Overig \" + _overig[1],\"occurences\":_overig[0],\"color\":\"rgb(59,134,134)\"},\n]\n \n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":595,"value":"$34","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":640,"value":"d2 = {\n \n //\n //\n // De Provincie Zuid-Holland is circa 330 700 ha groot. Hiervan is 270 000 ha landoppervlak. Op basis van het LULUCF- // bestand wordt het bos-areaal geschat op 10 476 ha. Dat is ca. 3.17 % van het totale landoppervlak.\n \n let totaal = 330700\n \n let land = 270000\n let bos = 10476\n \n let water = totaal - land\n let land_ex_bos = land-bos\n \n let _water_prc = Math.round(water/totaal * 100) + \"%\"\n let _overig_prc = Math.round(land_ex_bos/totaal * 100) + \"%\"\n let _bos_prc = Math.round(bos/totaal * 100) + \"%\"\n \n \n \n return [\n {\"tag\":\"Water - \"+_water_prc,\"occurences\":water,\"color\":\"rgb(139,180,186)\"},\n {\"tag\":\"Overig land - \"+_overig_prc,\"occurences\":land_ex_bos,\"color\":\"rgb(194,196,193)\"},\n {\"tag\":\"Bos - \"+_bos_prc,\"occurences\":bos,\"color\":\"rgb(59,134,134)\"},\n]\n \n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":637,"value":"$35","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":678,"value":"d4 = {\n let _bos_in_nnn = 5597\n let _nnn = 33085 \n let _nnn_overig = _nnn - _bos_in_nnn \n \n let _prc_nnn = Math.round(_nnn_overig / _nnn * 100) + \"%\"\n let _prc_bos = Math.round(_bos_in_nnn / _nnn * 100) + \"%\"\n \n return [\n {\"tag\":\"NNN overig - \"+ _prc_nnn,\"occurences\":_nnn_overig,\"color\":\"rgb(194,196,193)\"},\n {\"tag\":\"Bos in NNN - \" + _prc_bos,\"occurences\":_bos_in_nnn,\"color\":\"rgb(59,134,134)\"}\n]\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":683,"value":"$36","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":208,"value":"md`### Lib imports `","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":178,"value":"import {slider, select, checkbox} from \"@jashkenas/inputs\"","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":277,"value":"d3 = require('d3')","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"},{"id":213,"value":"L = {\n let L = await require(\"leaflet@1.6.0\").then(await require(\"proj4leaflet\"));\n if (!L._style) {\n const href = await require.resolve(\"leaflet@1/dist/leaflet.css\");\n document.head.appendChild(\n (L._style = html``)\n );\n }\n return L;\n}","pinned":false,"hidden":false,"mode":"ojs","author":"$undefined","summary":"$undefined","output":"$undefined","database":"$undefined"}],"files":"$W37","stdlib":"1","titling":"auto"}} 32:"$31:body"