Skip to content
View hmetcalfe1's full-sized avatar
Block or Report

Block or report hmetcalfe1

Block user

Prevent this user from interacting with your repositories and sending you notifications. Learn more about blocking users.

You must be logged in to block users.

Please don't include any personal information such as legal names or email addresses. Maximum 100 characters, markdown supported. This note will be visible to only you.
Report abuse

Contact GitHub support about this user’s behavior. Learn more about reporting abuse.

Report abuse
hmetcalfe1/README.md

Dr Helen Metcalfe πŸ‘©β€πŸ’»

Ecosystems Modeller and Weed Ecologist @Rothamsted

Pronouns: she/her

Working on:

  • 🌾 Agriculture
  • 🌿 Ecology
  • πŸ–₯ Modelling
  • πŸ—ΊοΈ Spatial statistics

Find me online:

Pinned Loading

  1. CropSequenceGenerator CropSequenceGenerator Public

    MATLAB 1

  2. BGmodel BGmodel Public

    An interactive introduction to modelling using the life-cycle of an agricultural weed as an example.

    R

  3. Unzip all files in a directory (recu... Unzip all files in a directory (recursive)
    1
    ## Unzip all files in a directory (recursive) ----------
    2
    UnzipAll <- function(FilePath) {
    3
    
    
    4
      ## Unzip any zip files ----------
    5
      # WARNING - Also removes the zip file once it has been unzipped
  4. Provides a unique numerical ID for a... Provides a unique numerical ID for an item with a value 1 higher than the current largest value in the column
    1
    ## IncrementID-----------
    2
    # Returns a number that is 1 more than the highest number in the given column
    3
    IncrementID <- function(ThisCol) {
    4
      if (sum(ThisCol)<1) {
    5
        ThisFileID <- 1
  5. parallel_sample_lsm.R parallel_sample_lsm.R
    1
    # e.g. Find the shannon diversity of the landscape in a radius of 1000m around each point
    2
    result <- furrr::future_map(1:nrow(pts), function(i) {
    3
      sample_lsm(landscape, y=matrix(pts[i, ],ncol=2),
    4
                 plot_id = Ptsdf$PtsID[i], size = 1000, what = "lsm_l_shdi", shape = "circle")
    5
    })