1.1 Leer Path
# Conectar a la base de datos
db_path <- "arbol_decisiones_expansion.db"
db_path
## [1] "arbol_decisiones_expansion.db"
con <- dbConnect(RSQLite::SQLite(), db_path) #ESTABLECER CONEXIÓN
# Obtener el último Estudio_ID de la tabla para continuar con el siguiente
last_id <- dbGetQuery(con, "SELECT MAX(Estudio_ID) FROM Estudios_Mercado")$`MAX(Estudio_ID)`
# Si no hay registros en la tabla, asigna 0
if (is.na(last_id)) {
last_id <- 0
}
# Crear el data.frame de municipios (definición de `municipios`)
municipios <- data.frame(
Mercado_ID = c(101, 102, 103, 104, 105), # Identificadores de mercado
Descripción = c(
"Estudio de mercado para el municipio A",
"Estudio de mercado para el municipio B",
"Estudio de mercado para el municipio C",
"Estudio de mercado para el municipio D",
"Estudio de mercado para el municipio E"
),
Resultados = c(
"Resultados preliminares del estudio A",
"Resultados preliminares del estudio B",
"Resultados preliminares del estudio C",
"Resultados preliminares del estudio D",
"Resultados preliminares del estudio E"
),
Fecha_Estudio = as.Date(c('2024-10-01', '2024-10-02', '2024-10-03', '2024-10-04', '2024-10-05'))
)
# Asignar un Estudio_ID único para cada nuevo municipio
municipios$Estudio_ID <- last_id + 1:nrow(municipios)
# Insertar los registros en la tabla
for (i in 1:nrow(municipios)) {
query <- sprintf(
"INSERT INTO Estudios_Mercado (Estudio_ID, Mercado_ID, Descripción, Resultados, Fecha_Estudio)
VALUES (%d, %d, '%s', '%s', '%s');",
municipios$Estudio_ID[i],
municipios$Mercado_ID[i],
municipios$Descripción[i],
municipios$Resultados[i],
municipios$Fecha_Estudio[i]
)
dbExecute(con, query) # Ejecuta la consulta
}
# Consulta para obtener todos los registros de la tabla Estudios_Mercado
query <- "SELECT * FROM Estudios_Mercado;"
resultados <- dbGetQuery(con, query)
# Mostrar los resultados
print(resultados)
## Estudio_ID Mercado_ID Descripción
## 1 1 1 Estudio de Demanda en Huichapan
## 2 2 2 Análisis de Competencia en Tecozautla
## 3 3 3 Estudio de Población en Nopala
## 4 4 101 Estudio de mercado para el municipio A
## 5 5 102 Estudio de mercado para el municipio B
## 6 6 103 Estudio de mercado para el municipio C
## 7 7 104 Estudio de mercado para el municipio D
## 8 8 105 Estudio de mercado para el municipio E
## 9 9 101 Estudio de mercado para el municipio A
## 10 10 102 Estudio de mercado para el municipio B
## 11 11 103 Estudio de mercado para el municipio C
## 12 12 104 Estudio de mercado para el municipio D
## 13 13 105 Estudio de mercado para el municipio E
## 14 14 101 Estudio de mercado para el municipio A
## 15 15 102 Estudio de mercado para el municipio B
## 16 16 103 Estudio de mercado para el municipio C
## 17 17 104 Estudio de mercado para el municipio D
## 18 18 105 Estudio de mercado para el municipio E
## 19 19 101 Estudio de mercado para el municipio A
## 20 20 102 Estudio de mercado para el municipio B
## 21 21 103 Estudio de mercado para el municipio C
## 22 22 104 Estudio de mercado para el municipio D
## 23 23 105 Estudio de mercado para el municipio E
## 24 24 101 Estudio de mercado para el municipio A
## 25 25 102 Estudio de mercado para el municipio B
## 26 26 103 Estudio de mercado para el municipio C
## 27 27 104 Estudio de mercado para el municipio D
## 28 28 105 Estudio de mercado para el municipio E
## 29 29 101 Estudio de mercado para el municipio A
## 30 30 102 Estudio de mercado para el municipio B
## 31 31 103 Estudio de mercado para el municipio C
## 32 32 104 Estudio de mercado para el municipio D
## 33 33 105 Estudio de mercado para el municipio E
## 34 34 101 Estudio de mercado para el municipio A
## 35 35 102 Estudio de mercado para el municipio B
## 36 36 103 Estudio de mercado para el municipio C
## 37 37 104 Estudio de mercado para el municipio D
## 38 38 105 Estudio de mercado para el municipio E
## 39 39 101 Estudio de mercado para el municipio A
## 40 40 102 Estudio de mercado para el municipio B
## 41 41 103 Estudio de mercado para el municipio C
## 42 42 104 Estudio de mercado para el municipio D
## 43 43 105 Estudio de mercado para el municipio E
## 44 44 101 Estudio de mercado para el municipio A
## 45 45 102 Estudio de mercado para el municipio B
## 46 46 103 Estudio de mercado para el municipio C
## 47 47 104 Estudio de mercado para el municipio D
## 48 48 105 Estudio de mercado para el municipio E
## 49 49 101 Estudio de mercado para el municipio A
## 50 50 102 Estudio de mercado para el municipio B
## 51 51 103 Estudio de mercado para el municipio C
## 52 52 104 Estudio de mercado para el municipio D
## 53 53 105 Estudio de mercado para el municipio E
## 54 54 101 Estudio de mercado para el municipio A
## 55 55 102 Estudio de mercado para el municipio B
## 56 56 103 Estudio de mercado para el municipio C
## 57 57 104 Estudio de mercado para el municipio D
## 58 58 105 Estudio de mercado para el municipio E
## Resultados
## 1 Se espera un crecimiento moderado con una tendencia favorable a la expansión.
## 2 Alta competencia local, requiere una estrategia diferenciada para el éxito.
## 3 Mercado pequeño pero con baja competencia, alta probabilidad de éxito.
## 4 Resultados preliminares del estudio A
## 5 Resultados preliminares del estudio B
## 6 Resultados preliminares del estudio C
## 7 Resultados preliminares del estudio D
## 8 Resultados preliminares del estudio E
## 9 Resultados preliminares del estudio A
## 10 Resultados preliminares del estudio B
## 11 Resultados preliminares del estudio C
## 12 Resultados preliminares del estudio D
## 13 Resultados preliminares del estudio E
## 14 Resultados preliminares del estudio A
## 15 Resultados preliminares del estudio B
## 16 Resultados preliminares del estudio C
## 17 Resultados preliminares del estudio D
## 18 Resultados preliminares del estudio E
## 19 Resultados preliminares del estudio A
## 20 Resultados preliminares del estudio B
## 21 Resultados preliminares del estudio C
## 22 Resultados preliminares del estudio D
## 23 Resultados preliminares del estudio E
## 24 Resultados preliminares del estudio A
## 25 Resultados preliminares del estudio B
## 26 Resultados preliminares del estudio C
## 27 Resultados preliminares del estudio D
## 28 Resultados preliminares del estudio E
## 29 Resultados preliminares del estudio A
## 30 Resultados preliminares del estudio B
## 31 Resultados preliminares del estudio C
## 32 Resultados preliminares del estudio D
## 33 Resultados preliminares del estudio E
## 34 Resultados preliminares del estudio A
## 35 Resultados preliminares del estudio B
## 36 Resultados preliminares del estudio C
## 37 Resultados preliminares del estudio D
## 38 Resultados preliminares del estudio E
## 39 Resultados preliminares del estudio A
## 40 Resultados preliminares del estudio B
## 41 Resultados preliminares del estudio C
## 42 Resultados preliminares del estudio D
## 43 Resultados preliminares del estudio E
## 44 Resultados preliminares del estudio A
## 45 Resultados preliminares del estudio B
## 46 Resultados preliminares del estudio C
## 47 Resultados preliminares del estudio D
## 48 Resultados preliminares del estudio E
## 49 Resultados preliminares del estudio A
## 50 Resultados preliminares del estudio B
## 51 Resultados preliminares del estudio C
## 52 Resultados preliminares del estudio D
## 53 Resultados preliminares del estudio E
## 54 Resultados preliminares del estudio A
## 55 Resultados preliminares del estudio B
## 56 Resultados preliminares del estudio C
## 57 Resultados preliminares del estudio D
## 58 Resultados preliminares del estudio E
## Fecha_Estudio
## 1 2023-05-01
## 2 2023-06-15
## 3 2023-07-20
## 4 2024-10-01
## 5 2024-10-02
## 6 2024-10-03
## 7 2024-10-04
## 8 2024-10-05
## 9 2024-10-01
## 10 2024-10-02
## 11 2024-10-03
## 12 2024-10-04
## 13 2024-10-05
## 14 2024-10-01
## 15 2024-10-02
## 16 2024-10-03
## 17 2024-10-04
## 18 2024-10-05
## 19 2024-10-01
## 20 2024-10-02
## 21 2024-10-03
## 22 2024-10-04
## 23 2024-10-05
## 24 2024-10-01
## 25 2024-10-02
## 26 2024-10-03
## 27 2024-10-04
## 28 2024-10-05
## 29 2024-10-01
## 30 2024-10-02
## 31 2024-10-03
## 32 2024-10-04
## 33 2024-10-05
## 34 2024-10-01
## 35 2024-10-02
## 36 2024-10-03
## 37 2024-10-04
## 38 2024-10-05
## 39 2024-10-01
## 40 2024-10-02
## 41 2024-10-03
## 42 2024-10-04
## 43 2024-10-05
## 44 2024-10-01
## 45 2024-10-02
## 46 2024-10-03
## 47 2024-10-04
## 48 2024-10-05
## 49 2024-10-01
## 50 2024-10-02
## 51 2024-10-03
## 52 2024-10-04
## 53 2024-10-05
## 54 2024-10-01
## 55 2024-10-02
## 56 2024-10-03
## 57 2024-10-04
## 58 2024-10-05