Update guardianr.R

trying out hardcoding just a couple of fields in show-fields