R help es - May 2023 - Trabajar con variables JSON

Hola a todos

Tengo una variable ?medios', sacada de un JSON con la siguiente forma:

{'A': 2406, 'A1': 'Casa', 'media':
[{'id': 1021, 'id_type': 7, 'type': None, 'url':
'https://www.aaa1.com', 'from_date': 12}, {'id': 1036,
'id_type': 3, 'type': None, 'url':
'https://bbb1.com', 'from_date': 12}, {'id': 1037,
'id_type': 6, 'type': None, 'url':
'https://ccc1.com', 'from_date': 12}]}
{'B': 2407, 'A1': 'Casa', 'media':
[{'id': 1022, 'id_type': 7, 'type': None, 'url':
'https://www.aaa2.com', 'from_date': 13}, {'id': 1036,
'id_type': 3, 'type': None, 'url':
'https://bbb2.com', 'from_date': 13}, {'id': 1037,
'id_type': 6, 'type': None, 'url':
'https://ccc2.com', 'from_date': 13}]}
?..


La variable se carga como ?character?.

La duda es esta, necesitaría extraer de cada fila las tres ?url? y meterlas en
tres columnas distintas. Primero las convierto en JSON para trabajar con
jsonlite, con toJSON, y luego utilizo
data <- jsonlite::fromJSON(json_str) para intentar entrar en ella  con
media_list <- data$medios, pero siempre me da el "error $ operator is
invalid for atomic vectors?

Me podríais ayudar

Gracias

Estimado Jose Miguel Contrapás

Hice una prueba pero debería corregir en mi computadora para poder reproducirlo.

Por parter, primero separe los datos a mano, solo para ver, y sería uno dentro
de otro:
?

Miro la documentación y lo convertiría a R
?

Pero yo tendría que codificar todo nuevamente para poder reproducirlo.?

Yo no puedo meterme con su ejemplo, pero ¿puede usted verificar si el archivo de
datos json está correcto?, una idea, utilice un convertir de json a c#, java,
cualquiera de los que hay en línea, porque si anda quiere decir que los datos no
tiene problema.

También tien la posibilidad de intentar con la librería json.

Pienso que una vez que lo tiene.dentro de R, al escribir strr(sus datos en json
dentro de R), le daría una pista de como encontrar la información que usted
necesita.

Javier Rubén Marcuzzi

> El 30 may. 2023, a las 14:51, Jose Miguel Contreras <jmcontreras en
ugr.es> escribió:
> 
> {'A': 2406, 'A1': 'Casa', 'media':
[{'id': 1021, 'id_type': 7, 'type': None, 'url':
'https://www.aaa1.com', 'from_date': 12}, {'id': 1036,
'id_type': 3, 'type': None, 'url':
'https://bbb1.com', 'from_date': 12}, {'id': 1037,
'id_type': 6, 'type': None, 'url':
'https://ccc1.com', 'from_date': 12}]}
> {'B': 2407, 'A1': 'Casa', 'media':
[{'id': 1022, 'id_type': 7, 'type': None, 'url':
'https://www.aaa2.com', 'from_date': 13}, {'id': 1036,
'id_type': 3, 'type': None, 'url':
'https://bbb2.com', 'from_date': 13}, {'id': 1037,
'id_type': 6, 'type': None, 'url':
'https://ccc2.com', 'from_date': 13}]}

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20230602/38bc64aa/attachment-0001.html>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Captura de pantalla 2023-06-02 a la(s) 10.51.18.png
Type: image/png
Size: 108446 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20230602/38bc64aa/attachment-0003.png>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Captura de pantalla 2023-06-02 a la(s) 10.52.34.png
Type: image/png
Size: 145894 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20230602/38bc64aa/attachment-0004.png>

------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: Captura de pantalla 2023-06-02 a la(s) 10.53.33.png
Type: image/png
Size: 39489 bytes
Desc: no disponible
URL:
<https://stat.ethz.ch/pipermail/r-help-es/attachments/20230602/38bc64aa/attachment-0005.png>