Los metodos de investigacion que utilizamos fueron tarafdsadfasdasda
library(dplyr)
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(gtsummary)
x <- 1
a <- 2
z <- x+a
print(z)
## [1] 3
Respuesta a la pregunta 1: Basado en neustro analisis x + a es igual a 3.
Fin del reporte