I am trying to assign author attributes in a BibEntry using person.

I start with a bib record:

@inproceedings{ICUS01:T01:S01:1,
crossref={ICUS01},
author={Camilo Dagum},
title={The Impact of Unified Science on Economics}
}

str() gives

.. ..$ author :Class 'person' hidden list of 1
.. .. ..$ :List of 5
.. .. .. ..$ given : chr "Camilo"
.. .. .. ..$ family : chr "Dagum"
.. .. .. ..$ role : NULL
.. .. .. ..$ email : NULL
.. .. .. ..$ comment: NULL

then make a person

p <- person(given = "Camilo", family = "Dagum", role = c("spk") )

This looks okay:

str(p)
Class 'person' hidden list of 1
$ :List of 5
..$ given : chr "Camilo"
..$ family : chr "Dagum"
..$ role : chr "spk"
..$ email : NULL
..$ comment: NULL

But then assign to author

bib[[1]]$author<- p

Get:
str()
..$ author :Class 'person' hidden list of 1
.. ..$ :List of 5
.. .. ..$ given : chr [1:2] "Camilo" "Dagum"
.. .. ..$ family : chr "[spk]"
.. .. ..$ role : NULL
.. .. ..$ email : NULL
.. .. ..$ comment: NULL

Try assigning individually

bib[[1]]$author$family <- "Dagum"
bib[[1]]$author$given <- "Camilo"
bib[[1]]$author$role <- "spk"

Same result:

str(bib)
..$ author :Class 'person' hidden list of 1
.. ..$ :List of 5
.. .. ..$ given : chr [1:2] "Camilo" "Dagum"
.. .. ..$ family : chr "[spk]"
.. .. ..$ role : NULL
.. .. ..$ email : NULL
.. .. ..$ comment: NULL

Similar for comment:
bib[[1]]$author$family <- "Dagum"
bib[[1]]$author$given <- "Camilo"
bib[[1]]$author$role <- "spk"
bib[[1]]$author$comment <- c(ORCID = "0000-0003-0918-3766")

str(bib)
..$ author :Class 'person' hidden list of 1
.. ..$ :List of 5
.. .. ..$ given : chr [1:3] "Camilo" "Dagum" "[spk]"
.. .. ..$ family : chr "(0000-0003-0918-3766)"
.. .. ..$ role : NULL
.. .. ..$ email : NULL
.. .. ..$ comment: NULL

All help is appreciated.