Datos de Cooperación Internacional, Victoria Bermúdez Ruiz

#Datos

library(dplyr)

Warning: package 'dplyr' was built under R version 4.4.2

Adjuntando el paquete: 'dplyr'

The following objects are masked from 'package:stats':

    filter, lag

The following objects are masked from 'package:base':

    intersect, setdiff, setequal, union

datosdecooperacion <- tibble(
  pais = c("Argentina", "Brasil", "Chile", "Colombia", "España", 
           "México", "Francia", "Alemania", "Japón", "EE.UU.", 
           "China", "India"),
  idh = c(0.845, 0.754, 0.851, 0.767, 0.904, 
          0.758, 0.903, 0.936, 0.925, 0.921, 
          0.768, 0.645),
  ayudadesarrollo = c(0.23, 0.31, 0.19, 0.27, 0.47, 
                      0.22, 0.61, 0.73, 0.42, 0.15, 
                      0.35, 0.18),
  nivelcooperacion = c("Medio", "Medio", "Bajo", "Medio", "Alto", 
                       "Medio", "Alto", "Alto", "Alto", "Bajo", 
                       "Medio", "Bajo"))

# Mostrar los datos
print(datosdecooperacion)

# A tibble: 12 × 4
   pais        idh ayudadesarrollo nivelcooperacion
   <chr>     <dbl>           <dbl> <chr>           
 1 Argentina 0.845            0.23 Medio           
 2 Brasil    0.754            0.31 Medio           
 3 Chile     0.851            0.19 Bajo            
 4 Colombia  0.767            0.27 Medio           
 5 España    0.904            0.47 Alto            
 6 México    0.758            0.22 Medio           
 7 Francia   0.903            0.61 Alto            
 8 Alemania  0.936            0.73 Alto            
 9 Japón     0.925            0.42 Alto            
10 EE.UU.    0.921            0.15 Bajo            
11 China     0.768            0.35 Medio           
12 India     0.645            0.18 Bajo