Map macroregrion students

Exploration des macrorégions dessinées par les étudiants

viewof select_W1A = Inputs.select(["All", "Germany", "France Metropolitan", "France Antilles", "Ireland", "Turkey", "Tunisia"], {label: "Survey sample"})

viewof region_W1A = Inputs.select(new Map([["All",'All'],["Europe","europe"],["Western Europe","europe_ouest"],
                ["Central Europe","europe_centr"],
                ["European Union","union_europ"],
                ["Africa","africa"],
                ["Northern Africa","africa_nord"],
                ["America","america"],
                ["Central America","america_ctr"],
                ["Asia/Eurasia","asia"],
                ["Mediterranean","medit"],
                ["Mid & Near East","mideast"],
                ["Carribean","carrib"],
                ["Antilles","antil"],
                ["The West/Ocident","western"]
                ]), {label: "Name of macroregion contains ..."})

// ---------------------------------------------------------------------------
//                        MAP
// ---------------------------------------------------------------------------

map_W1A = {
  // Set highlight
function highlightFeature(e) {
    var layer = e.target;
    layer.setStyle({
        weight: 1,
        color: '#ba66a9',
        dashArray: '',
        fillOpacity: 0.5    
    });
}

  // Reset Highlight
  function resetHighlight(e) {
    layer.resetStyle(e.target);
}

  // OnEach featur
function onEachFeature(feature, layer) {
    layer.bindPopup(function (Layer) {
    return "<b>Country : </b>" + Layer.feature.properties.country + "<br>" +
      "<b>Sex : </b>" + Layer.feature.properties.sex + "<br>" +
      "<b>Fields of study : </b>" + Layer.feature.properties.field + "<br>" +
      "<b>Opinion about EU : </b>" + Layer.feature.properties.opiEU + "<br>" +
      "<b>Macro region : </b>" + Layer.feature.properties.macro + "<br>" +
      Layer.feature.properties.X0001_met_respID_aut + ' - "' + Layer.feature.properties.ID_geom + '" <br>';
  })
    layer.on({
        mouseover: highlightFeature,
        mouseout: resetHighlight,
    });
}

  // MAP
const container = yield htl.html`<div style="height: 50vh; width: 50vh">`;
const map = L.map(container);
const layer = L.geoJSON(macroreg_filtered, {
onEachFeature: onEachFeature,
  style: {
    opacity: 1,
    fillOpacity: opacity_W1A,
    color: "#d13f0f",
    weight: stroke_W1A }
  }).addTo(map);

// fit map to geom bounds  
map.fitBounds(layer.getBounds(), {maxZoom: 15});

// Tile Layer  
L.tileLayer('https://{s}.basemaps.cartocdn.com/rastertiles/voyager/{z}/{x}/{y}{r}.png',
    {attribution: '&copy; <a href="https://www.openstreetmap.org/copyright">OpenStreetMap</a> contributors &copy; <a href="https://carto.com/attributions">CARTO</a>',
      subdomains: "abcd",
      maxZoom: 20
    }).addTo(map);
}


// ---------------------------------------------------------------------------
//                        TABLE
// ---------------------------------------------------------------------------



// ---------------------------------------------------------------------------
//                        DATA
// ---------------------------------------------------------------------------

macroreg_students = FileAttachment("../data/W1A_BDG_macroreg.GeoJSON").json()

macroreg = geo.simplify(macroreg_students, {k:0.25})

macroreg_sorted = geo.featurecollection(macroreg.features.sort((a, b) => d3.descending(a.properties.area_3857, b.properties.area_3857)))

macroreg_filtered = {
  let filtered =  region_W1A == "All" ? macroreg : geo.filter(macroreg_sorted, (d) => d[region_W1A] == 1)
  filtered = select_W1A == "All" ? filtered : geo.filter(filtered, (d) => d.country == select_W1A)
  return geo.rewind(filtered)
}

opacity_W1A = {let opacity
  if(macroreg_filtered.features.length > 60) { 
    return opacity = 0.0
  } else if(macroreg_filtered.features.length < 60 && macroreg_filtered.features.length > 20) {
    return opacity = 0.02
  } else { 
    return opacity = 0.06
  }
}
stroke_W1A = {let stroke
  if(macroreg_filtered.features.length > 30) { 
    return stroke = 0.2
  } else { 
    return stroke = 0.5
  }
}
// ---------------------------------------------------------------------------
//                        LIBS
// ---------------------------------------------------------------------------

geo = require("geotoolbox@2.0.3")