Combine datos de múltiples dominios
Además de las nuevas entidades y propiedades, Wolfram Knowledgebase también ha sido mejorado por alineaciones y conexiones adicionales entre dominios de datos.
Comience con una estrella de cine.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_66.png)
Entity["Person", "MattDamon::88f5d"][
EntityProperty["Person", "Image"]]
![](assets.es/combine-data-from-multiple-domains/O_46.png)
Recupere una lista de sus apariciones en películas.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_67.png)
films = Entity["Person", "MattDamon::88f5d"]["MovieAppearances"];
Extraiga una lista de coestrellas que compartan la misma información biográfica en Wolfram Knowledgebase.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_68.png)
costars =
Cases[DeleteDuplicates[
Flatten[EntityValue[films, "Cast"]]], _Entity];
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_69.png)
RandomSample[costars, 10]
![](assets.es/combine-data-from-multiple-domains/O_47.png)
Represente gráficamente los lugares de nacimiento conocidos de las coestrellas que aparezcan en al menos una de las películas de Matt Damon.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_70.png)
Quiet@GeoGraphics[{Red, PointSize[0.01], Opacity[0.5],
Point@DeleteMissing[EntityValue[costars, "BirthPlace"]]}]
![](assets.es/combine-data-from-multiple-domains/O_48.png)
Regrese a la lista de coestrellas y vea si alguna de ellas ha alcanzado notoriedad en algún otro dominio creativo.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_71.png)
writers =
Normal[DeleteMissing[
EntityValue[costars, "NotableBooks", "EntityAssociation"]]]
![](assets.es/combine-data-from-multiple-domains/O_49.png)
Utilice propiedades de películas y personas para identificar coestrellas que se supone sólo aparecen en imágenes de archivo, y elimínelas de la lista.
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_72.png)
firstFilm = Sort[EntityValue[films, "ReleaseDate"]][[1]]
![](assets.es/combine-data-from-multiple-domains/O_50.png)
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_73.png)
impossibleCostars =
Select[writers, First[#]["DeathDate"] < firstFilm &]
![](assets.es/combine-data-from-multiple-domains/O_51.png)
![Click for copyable input](assets.es/combine-data-from-multiple-domains/In_74.png)
Complement[writers, impossibleCostars]
![](assets.es/combine-data-from-multiple-domains/O_52.png)