Código
library(readr)
library(tidyverse)
library(dplyr)
library(gt)
library(flextable) # fallback para Word/PDF cuando gt::as_word falla
library(ftExtra) # colformat_md() para procesar *italics* en celdasEn esta sección se hace una recopilación de los estudios de dinámica poblacional en orquídeas que han usado matrices de transición de estados y de edades. Se identifican algunos de los temas principales de los trabajos.
En la siguiente tabla se presentan los estudios de dinámica poblacional en orquídeas que usaron MPP y las preguntas principales que los autores intentaron responder. En la gran mayoría de los trabajos se evalúan múltiples hipótesis/ideas sobre la dinámica poblacional de las orquídeas. Para información específica sobre la metodología usada en cada estudio, se recomienda revisar los trabajos originales.
Clave de las variables:
library(readr)
library(tidyverse)
library(dplyr)
library(gt)
library(flextable) # fallback para Word/PDF cuando gt::as_word falla
library(ftExtra) # colformat_md() para procesar *italics* en celdaslistsp <- dplyr::tribble(
~"Genero", ~Especies, ~Riesgo, ~"Var esp.", ~"Var temp", ~"Lat", ~"Est param", ~"Hist vida", ~Otro, ~Ref,
"*Aspasia*", "*principissa*", "Si", "-", "Si", "-", "-", "-", "-", "@zotz2006population",
"*Brassavola*", "*cucullata*", "Si", "Si", "Si", "-", "-", "-", "IPM, Transient Dynamics, Transfer Function", "@ackerman2020small",
"*Broughtonia*", "*cubensis*", "Si", "Si", "Si", "-", "-", "-", "Transient Dynamics", "@raventos2021effects",
"*Caladenia*", "*amoena*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy; ",
"*Caladenia*", "*argocalla*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*clavigera*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*elegans*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*graniticola*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*macroclavia*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*oenochila*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*rosella*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*valida*", "Si", "-", "-", "Si", "Si", "Si", "Selección de modelos, método para estimar latencia", "@tremblay2009population @tremblay2009dormancy",
"*Caladenia*", "*orientalis*", "Si", "Si", "Si", "Si", "-", "-", "Interacciones abióticas", "@coates2009demographic",
"*Cephalanthera*", "*longifolia*", "-", "-", "-", "Si", "Si", "Si", "Interacciones abióticas y bióticas", "@shefferson2012linking",
"*Cleistes*", "*divaricata* var. *divaricata*", "Si", "Si", "Si", "Si", "Si", "-", "-", "@gregg1991variation",
"*Cleistes*", "*divaricata* var. *bifaria*", "Si", "Si", "Si", "Si", "Si", "-", "-", "@gregg1991variation",
"*Cleistes*", "*bifaria*", "-", "Si", "-", "Si", "-", "-", "Estructura de tamaño y estado", "@gregg2006comparison",
"*Corallorhiza*", "*trifida*", "Si", "-", "Si", "Si", "-", "-", "-", "@iriondo2009peligro",
"*Crepidium*", "*acuminatum*", "Si", "-", "Si", "-", "-", "-", "Efecto de cosecha", "@timsina2021six",
"*Cypripedium*", "*acaule*", "-", "-", "-", "-", "Si", "-", "Edad de individuos reproductivos", "@cochran1992simple",
"*Cypripedium*", "*calceolus*", "Si", "Si", "Si", "Si", "-", "-", "Selección de modelos", "@nicole2005population",
"*Cypripedium*", "*calceolus*", "Si", "Si", "Si", "Si", "-", "-", "Efecto de aislamiento", "@garcia2010living",
"*Cypripedium*", "*calceolus*", "-", "-", "-", "-", "-", "-", "Costo de latencia, Interacciones abióticas y bióticas", "@shefferson2012linking",
"*Cypripedium*", "*fasciculatum*", "Si", "Si", "Si", "Si", "-", "-", "Selección de modelos, Interacciones abióticas", "@thorpe2011trends",
"*Cypripedium*", "*parviflorum*", "-", "-", "-", "Si", "-", "Si", "-", "@shefferson2014life",
"*Cypripedium*", "*reginae*", "-", "Si", "-", "Si", "-", "Si", "Selección de modelos, interacciones bióticas", "@kery2004demographic",
"*Cypripedium*", "*lentiginosum*", "-", "-", "-", "-", "Si", "-", "Leslie matrix", "@zhongjian2008correlation",
"*Dactylorhiza*", "*hatagirea*", "Si", "Si", "Si", "Si", "-", "-", "Efecto de cosecha", "@chapagain2021illegal",
"*Dactylorhiza*", "*lapponica*", "-", "Si", "Si", "Si", "-", "-", "Efecto antropogénico, interacciones abióticas", "@sletvold2010long; @sletvold2013climate",
"*Dendrophylax*", "*lindenii*", "Si", "-", "Si", "-", "-", "-", "Efecto de densidad, **los datos de la matriz no están disponibles**", "@gonzalez2009dinamica; @raventos2015population",
"*Epidendrum*", "*xanthinum*", "Si", "Si", "-", "-", "-", "-", "Comparación de poblaciones", "@farfan2008estrategias",
"*Epipactis*", "*atrorubens*", "Si", "Si", "Si", "Si ", "-", "-", "Incorporación de variable de endogamia", "@hens2017low",
"*Epipactis*", "*atrorubens*", "-", "-", "-", "- ", "-", "-", "", "@jakalaniemi2011orchids",
"*Erycina*", "*crista-galli*", "Si", "Si", "-", "-", "-", "-", "-", "@mondragon2007life",
"*Erycina*", "*crista-galli*", "-", "-", "-", "-", "-", "-", "-", "@maldonado2005patron",
"*Guarianthe*", "*aurantiaca*", "Si", "Si", "-", "-", "-", "-", "Efecto de cosecha", "@mondragon2009population",
"*Herminium*", "*monorchis*", "Si", "-", "Si", "Si", "-", "-", "Efecto abiótico", "@wells1998flowering",
"*Himantoglossum*", "*hircinum*", "Si", "-", "Si", "-", "-", "-", "Efecto abiótico: sequía", "@wells1998flowering",
"*Himantoglossum*", "*hircinum*", "Si", "-", "Si", "-", "-", "-", "Modelando expansión", "@carey1998modelling",
"*Himantoglossum*", "*hircinum*", "Si", "-", "Si", "Si", "-", "-", "Efecto abiótico: Precipitación y Temp del suelo", "@pfeifer2006influence",
"*Isotria*", "*medeoloides*", "Si", "-", "Si", "-", "-", "-", "Tratamiento del dosel", "@dibble2019demography",
"*Jacquiniella*", "*leucomelana*", "Si", "-", "Si", "-", "-", "-", "Metapopulation approach", "@winkler2009population",
"*Jacquiniella*", "*teretifolia*", "Si", "-", "Si", "-", "-", "-", "Metapopulation approach", "@winkler2009population",
"*Laelia*", "*autumnalis*", "Si", "Si", "Si", "-", "-", "", "Efecto de cosecha", "@emeterio2021does",
"*Laelia*", "*speciosa*", "Si", "-", "Si", "-", "-", "-", "Efecto de cosecha", "@hernandez1992dinamica",
"*Lepanthes*", "*caritensis*", "Si", "Si", "Si", "-", "-", "-", "-", "@tremblay1997lepanthes",
"*Lepanthes*", "*caritensis*", "Si", "Si", "Si", "-", "-", "-", "Efecto de huracanes", "@crain2019sheltered",
"*Lepanthes*", "*eltoroensis*", "Si", "Si", "-", "-", "-", "-", "Tamaño efectivo de Población, Ne y largo de vida", "@tremblay2001gene",
"*Lepanthes*", "*eltoroensis*", "Si", "Si", "Si", "-", "-", "-", "-", "@tremblay2003population",
"*Lepanthes*", "*eltoroensis*", "Si", "Si", "Si", "Si", "-", "-", "Nueva metodología para estimar parámetros", "@tremblay2021population",
"*Lepanthes*", "*rubripetala*", "-", "-", "-", "-", "-", "-", "Tamaño efectivo de Población, Ne y largo de vida", "@tremblay2001gene",
"*Lepanthes*", "*rubripetala*", "Si", "Si", "Si", "-", "-", "-", "Dinámica de transiciones", "@tremblay2015stable",
"*Lepanthes*", "*rupestris*", "-", "-", "-", "-", "-", "-", "Tamaño efectivo de Población, Ne y largo de vida", "@tremblay2001gene",
"*Lepanthes*", "*acuminata*", "Si", "-", "-", "-", "-", "-", "Dinámica de transiciones", "@raventos2018comparison",
"*Lycaste*", "*aromatica*", "Si", "-", "Si", "-", "-", "-", "Metapopulation approach", "@winkler2009population",
"*Neotinea*", "*ustulata*", "Si", "Si", "-", "Si", "-", "Si", "Método para estimar latencia", "@shefferson2007dormancy",
"*Oeceoclades*", "*maculata*", "Si", "Si", "Si", "-", "-", "-", "Especie invasiva", "@riveron2019spatio",
"*Oncidium*", "*poikilostalix*", "Si", "-", "-", "-", "-", "-", "Dinámica de transiciones", "@raventos2018comparison",
"*Orchis*", "*purpurea*", "Si", "-", "Si", "-", "-", "-", "LTRE", "@jacquemyn2010seed",
"*Orchis*", "*ustulata*", "Si", "Si", "-", "-", "-", "-", "mismo que *Neotinea ustulata*", "@tali2002dynamics",
"*Phaius*", "*australis*", "Si", "Si", "-", "-", "-", "-", "Efecto espacial y abiótico", "@simmons2016Viability",
"*Platanthera*", "*hookeri*", "Si", "Si", "-", "-", "-", "-", "-", "@reddoch2007population",
"*Platanthera*", "*praeclara*", "Si", "Si", "Si", "Si", "-", "-", "Variación temporal", "@sieg1995influence",
"*Platanthera*", "*macrophylla*", "Si", "Si", "Si", "-", "-", "-", "Incluye estado de protocormo", "@cleavitt2017life @berry2021population",
"*Platanthera*", "*orbiculata*", "Si", "Si", "Si", "-", "-", "-", "Incluye estado de protocormo", "@cleavitt2017life @berry2021population",
"*Prasophyllum*", "*correctum*", "Si", "", "Si", "Si", "-", "-", "Efecto de fuego", "@coates2006effects",
"*Pseudorchis*", "*albida*", "-", "-", "-", "-", "-", "-", "-", "@stipkova2013mowing",
"*Rodriguezia*", "*granadensis*", "Si", "Si", "Si", "-", "-", "", "Efecto antropogénico, **to be digitized**", "@ospina2023effect",
"*Serapias*", "*cordigera*", "Si", "Si", "Si", "Si", "-", "-", "Efecto antropogénico", "@pellegrino2014effects",
"*Spathoglottis*", "*plicata*", "Si", "Si", "Si", "-", "-", "-", "Orquídea invasiva y interacciones bióticas", "@falcon2017quantifying",
"*Spiranthes*", "*delitescens*", "Si", "Si", "Si", "Si", "-", "-", "Efecto abiótico: sequía", "@mcclaran1992population",
"*Spiranthes*", "*parksii*", "Si", "", "-", "-", "-", "-", "Efecto abiótico: herbivoría", "@wonka2010herbivores",
"*Telipogon*", "*helleri*", "Si", "-", "-", "-", "-", "Si", "Dinámica de transición", "@raventos2018comparison",
"*Tolumnia*", "*variegata*", "Si", "Si", "Si", "-", "-", "Si", "El costo de reproducción", "@calvo1993evolutionary",
"*Trichocentrum*", "*undulatum*", "-", "-", "-", "-", "-", "", "Efecto de aislamiento", "@borrero2023populations"
)# gt::as_word() es buggy con contenido markdown (incluye @-citations);
# falla con `subscript out of bounds` en docx. Usamos gt para HTML
# (donde renderiza bien) y flextable + ftExtra::colformat_md para Word/PDF.
if (knitr::is_html_output()) {
listsp |>
gt() |>
fmt_markdown(columns = c(Genero, Especies, Otro, Ref)) |>
cols_label(
Genero = "Género",
Especies = "Especies",
Riesgo = "Riesgo",
`Var esp.` = "Var. esp.",
`Var temp` = "Var. temp.",
Lat = "Latencia",
`Est param` = "Est. param.",
`Hist vida` = "Hist. vida",
Otro = "Otro",
Ref = "Referencia"
) |>
cols_align(align = "left", columns = everything()) |>
tab_options(
table.font.names = c("Libertinus Serif", "Iowan Old Style", "Palatino", "Georgia"),
table.font.size = px(12),
column_labels.font.size = px(12),
column_labels.font.weight = "bold",
table.width = pct(100),
data_row.padding = px(4)
)
} else {
listsp |>
as.data.frame() |>
flextable() |>
flextable::set_header_labels(
`Var esp.` = "Var. esp.", `Var temp` = "Var. temp.",
Lat = "Latencia", `Est param` = "Est. param.",
`Hist vida` = "Hist. vida", Genero = "Género", Ref = "Referencia"
) |>
ftExtra::colformat_md(j = c("Genero", "Especies", "Otro", "Ref")) |>
ft_wide()
}| Género | Especies | Riesgo | Var. esp. | Var. temp. | Latencia | Est. param. | Hist. vida | Otro | Referencia |
|---|---|---|---|---|---|---|---|---|---|
| Aspasia | principissa | Si | - | Si | - | - | - | Zotz y Schmidt (2006) | |
| Brassavola | cucullata | Si | Si | Si | - | - | - | IPM, Transient Dynamics, Transfer Function | Ackerman et al. (2020) |
| Broughtonia | cubensis | Si | Si | Si | - | - | - | Transient Dynamics | Raventós et al. (2021) |
| Caladenia | amoena | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b); |
| Caladenia | argocalla | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | clavigera | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | elegans | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | graniticola | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | macroclavia | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | oenochila | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | rosella | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | valida | Si | - | - | Si | Si | Si | Selección de modelos, método para estimar latencia | Tremblay et al. (2009a) Tremblay et al. (2009b) |
| Caladenia | orientalis | Si | Si | Si | Si | - | - | Interacciones abióticas | Coates y Duncan (2009) |
| Cephalanthera | longifolia | - | - | - | Si | Si | Si | Interacciones abióticas y bióticas | Shefferson et al. (2012) |
| Cleistes | divaricata var. divaricata | Si | Si | Si | Si | Si | - | Gregg (1991) | |
| Cleistes | divaricata var. bifaria | Si | Si | Si | Si | Si | - | Gregg (1991) | |
| Cleistes | bifaria | - | Si | - | Si | - | - | Estructura de tamaño y estado | Gregg y Kéry (2006) |
| Corallorhiza | trifida | Si | - | Si | Si | - | - | Iriondo Alegria et al. (2009) | |
| Crepidium | acuminatum | Si | - | Si | - | - | - | Efecto de cosecha | Timsina et al. (2021) |
| Cypripedium | acaule | - | - | - | - | Si | - | Edad de individuos reproductivos | Cochran y Ellner (1992) |
| Cypripedium | calceolus | Si | Si | Si | Si | - | - | Selección de modelos | Nicolè et al. (2005) |
| Cypripedium | calceolus | Si | Si | Si | Si | - | - | Efecto de aislamiento | Garcı́a et al. (2010) |
| Cypripedium | calceolus | - | - | - | - | - | - | Costo de latencia, Interacciones abióticas y bióticas | Shefferson et al. (2012) |
| Cypripedium | fasciculatum | Si | Si | Si | Si | - | - | Selección de modelos, Interacciones abióticas | Thorpe et al. (2011) |
| Cypripedium | parviflorum | - | - | - | Si | - | Si | Shefferson et al. (2014) | |
| Cypripedium | reginae | - | Si | - | Si | - | Si | Selección de modelos, interacciones bióticas | Kéry y Gregg (2004) |
| Cypripedium | lentiginosum | - | - | - | - | Si | - | Leslie matrix | Zhongjian et al. (2008) |
| Dactylorhiza | hatagirea | Si | Si | Si | Si | - | - | Efecto de cosecha | Chapagain et al. (2021) |
| Dactylorhiza | lapponica | - | Si | Si | Si | - | - | Efecto antropogénico, interacciones abióticas | Sletvold et al. (2010); Sletvold et al. (2013) |
| Dendrophylax | lindenii | Si | - | Si | - | - | - | Efecto de densidad, los datos de la matriz no están disponibles | González-Hernández (2009); Raventós et al. (2015) |
| Epidendrum | xanthinum | Si | Si | - | - | - | - | Comparación de poblaciones | Farfán Camargo (2008) |
| Epipactis | atrorubens | Si | Si | Si | Si | - | - | Incorporación de variable de endogamia | Hens et al. (2017) |
| Epipactis | atrorubens | - | - | - | - | - | - | Jäkäläniemi et al. (2011) | |
| Erycina | crista-galli | Si | Si | - | - | - | - | Mondragón et al. (2007) | |
| Erycina | crista-galli | - | - | - | - | - | - | Maldonado Flores (2005) | |
| Guarianthe | aurantiaca | Si | Si | - | - | - | - | Efecto de cosecha | Mondragón (2009) |
| Herminium | monorchis | Si | - | Si | Si | - | - | Efecto abiótico | Wells et al. (1998) |
| Himantoglossum | hircinum | Si | - | Si | - | - | - | Efecto abiótico: sequía | Wells et al. (1998) |
| Himantoglossum | hircinum | Si | - | Si | - | - | - | Modelando expansión | Carey (1998) |
| Himantoglossum | hircinum | Si | - | Si | Si | - | - | Efecto abiótico: Precipitación y Temp del suelo | Pfeifer y Jetschke (2006) |
| Isotria | medeoloides | Si | - | Si | - | - | - | Tratamiento del dosel | Dibble et al. (2019) |
| Jacquiniella | leucomelana | Si | - | Si | - | - | - | Metapopulation approach | Winkler et al. (2009) |
| Jacquiniella | teretifolia | Si | - | Si | - | - | - | Metapopulation approach | Winkler et al. (2009) |
| Laelia | autumnalis | Si | Si | Si | - | - | Efecto de cosecha | Emeterio-Lara et al. (2021) | |
| Laelia | speciosa | Si | - | Si | - | - | - | Efecto de cosecha | Hernández-Apolinar (1992) |
| Lepanthes | caritensis | Si | Si | Si | - | - | - | Tremblay (1997) | |
| Lepanthes | caritensis | Si | Si | Si | - | - | - | Efecto de huracanes | Crain et al. (2019) |
| Lepanthes | eltoroensis | Si | Si | - | - | - | - | Tamaño efectivo de Población, Ne y largo de vida | Tremblay y Ackerman (2001) |
| Lepanthes | eltoroensis | Si | Si | Si | - | - | - | Tremblay y Hutchings (2003) | |
| Lepanthes | eltoroensis | Si | Si | Si | Si | - | - | Nueva metodología para estimar parámetros | Tremblay et al. (2021) |
| Lepanthes | rubripetala | - | - | - | - | - | - | Tamaño efectivo de Población, Ne y largo de vida | Tremblay y Ackerman (2001) |
| Lepanthes | rubripetala | Si | Si | Si | - | - | - | Dinámica de transiciones | Tremblay et al. (2015) |
| Lepanthes | rupestris | - | - | - | - | - | - | Tamaño efectivo de Población, Ne y largo de vida | Tremblay y Ackerman (2001) |
| Lepanthes | acuminata | Si | - | - | - | - | - | Dinámica de transiciones | Raventós et al. (2018) |
| Lycaste | aromatica | Si | - | Si | - | - | - | Metapopulation approach | Winkler et al. (2009) |
| Neotinea | ustulata | Si | Si | - | Si | - | Si | Método para estimar latencia | Shefferson y Tali (2007) |
| Oeceoclades | maculata | Si | Si | Si | - | - | - | Especie invasiva | Riverón-Giró et al. (2019) |
| Oncidium | poikilostalix | Si | - | - | - | - | - | Dinámica de transiciones | Raventós et al. (2018) |
| Orchis | purpurea | Si | - | Si | - | - | - | LTRE | Jacquemyn et al. (2010) |
| Orchis | ustulata | Si | Si | - | - | - | - | mismo que Neotinea ustulata | Tali (2002) |
| Phaius | australis | Si | Si | - | - | - | - | Efecto espacial y abiótico | Simmons (2016) |
| Platanthera | hookeri | Si | Si | - | - | - | - | Reddoch y Reddoch (2007) | |
| Platanthera | praeclara | Si | Si | Si | Si | - | - | Variación temporal | Sieg y King (1995) |
| Platanthera | macrophylla | Si | Si | Si | - | - | - | Incluye estado de protocormo | Cleavitt et al. (2017) Berry y Cleavitt (2021) |
| Platanthera | orbiculata | Si | Si | Si | - | - | - | Incluye estado de protocormo | Cleavitt et al. (2017) Berry y Cleavitt (2021) |
| Prasophyllum | correctum | Si | Si | Si | - | - | Efecto de fuego | Coates et al. (2006) | |
| Pseudorchis | albida | - | - | - | - | - | - | Štípková (2013) | |
| Rodriguezia | granadensis | Si | Si | Si | - | - | Efecto antropogénico, to be digitized | Ospina-Calderón et al. (2023) | |
| Serapias | cordigera | Si | Si | Si | Si | - | - | Efecto antropogénico | Pellegrino y Bellusci (2014) |
| Spathoglottis | plicata | Si | Si | Si | - | - | - | Orquídea invasiva y interacciones bióticas | Falcón et al. (2017) |
| Spiranthes | delitescens | Si | Si | Si | Si | - | - | Efecto abiótico: sequía | McClaran y Sundt (1992) |
| Spiranthes | parksii | Si | - | - | - | - | Efecto abiótico: herbivoría | Wonka (2010) | |
| Telipogon | helleri | Si | - | - | - | - | Si | Dinámica de transición | Raventós et al. (2018) |
| Tolumnia | variegata | Si | Si | Si | - | - | Si | El costo de reproducción | Calvo (1993) |
| Trichocentrum | undulatum | - | - | - | - | - | Efecto de aislamiento | Borrero et al. (2023) |
#### https://cran.r-project.org/web/packages/ftExtra/vignettes/format_columns.html # Enlace para formatear columnas que tiene referencias en formato markdownNotas para añadir a la tabla
En la siguiente lista incluimos algunos de los trabajos de dinámica poblacional que no usan MPP para responder a su pregunta. La lista es muy grande y no es exhaustiva. Incluye trabajos que usan otros métodos de estimación de parámetros, como modelos de regresión, o que usan IPM (Integral Population Models), pero no usan matrices de transición de estados o edades, que es el método alterno de estimación de parámetros que se usa en este libro.
NO_matrix <- dplyr::tribble(
~"Genero", ~Especies, ~Otro, ~Ref,
"*Isotria*", "*medeoloides*", "no matrix", "@alahuhta2017instant",
"*Cyclopogon*", "*luteoalbus*", "no matrix", "@juarez2014viability",
"*Cypripedium*", "*calceolus*", "no matrix", "@davison2013contributions",
"*Cypripedium*", "*candidum*", "no matrix", "@shefferson2017predicting",
"*Gymnadenia*", "*conopsea*", "no matrix", "@oien2002flowering",
"*Ophrys*", "*sphegodes*", "no matrix", "@hutchings2010population",
"*Ophrys*", "*sphegodes*", "no matrix", "@shefferson2017predicting",
"*Orchis*", "*morio*", "no matrix", "@wells1998flowering",
"*Spiranthes*", "*spiralis*", "no matrix", "@jacquemyn2007long"
)# Mismo patrón que `lista2-gt`: gt para HTML, flextable para Word/PDF
# (gt::as_word es buggy con contenido markdown).
if (knitr::is_html_output()) {
NO_matrix |>
gt() |>
fmt_markdown(columns = c(Genero, Especies, Otro, Ref)) |>
cols_label(
Genero = "Género",
Especies = "Especies",
Otro = "Otro",
Ref = "Referencia"
) |>
cols_align(align = "left", columns = everything()) |>
tab_options(
table.font.names = c("Libertinus Serif", "Iowan Old Style", "Palatino", "Georgia"),
table.font.size = px(12),
column_labels.font.size = px(12),
column_labels.font.weight = "bold",
table.width = pct(100),
data_row.padding = px(4)
)
} else {
NO_matrix |>
as.data.frame() |>
flextable() |>
flextable::set_header_labels(Genero = "Género", Ref = "Referencia") |>
ftExtra::colformat_md(j = c("Genero", "Especies", "Otro", "Ref")) |>
ft_wide()
}| Género | Especies | Otro | Referencia |
|---|---|---|---|
| Isotria | medeoloides | no matrix | Alahuhta et al. (2017) |
| Cyclopogon | luteoalbus | no matrix | Juárez et al. (2014) |
| Cypripedium | calceolus | no matrix | Davison et al. (2013) |
| Cypripedium | candidum | no matrix | Shefferson et al. (2017) |
| Gymnadenia | conopsea | no matrix | Øien y Moen (2002) |
| Ophrys | sphegodes | no matrix | Hutchings (2010) |
| Ophrys | sphegodes | no matrix | Shefferson et al. (2017) |
| Orchis | morio | no matrix | Wells et al. (1998) |
| Spiranthes | spiralis | no matrix | Jacquemyn et al. (2007) |