Convergencia post-COVID: 1 BITCOIN y 1kg de ORO
Convergencia post-COVID: 1 BITCOIN y 1kg de ORO
por Vitaliy Kaurov
Introducción
Introducción
El oro se dispara el 8 de octubre de 2025. Dado que actualmente podemos comprar una barra de oro en COSTCO, pensé en demostrar mi observación reciente sobre cómo ver el oro en diferentes unidades: kilogramos. Esas no se pueden comprar en COSTCO, pero son un “estándar dorado” (el juego de palabras es intencionado) y, notablemente, su precio ha estado oscilando bastante al compás de 1 Bitcoin recientemente. Usualmente la gente no nota esto porque, de manera estándar, el oro se cotiza para una unidad de masa mucho menor.
He notado que el precio del bitcoin ha sido aproximadamente el precio de 1 kg de oro durante el último año. Esto puede verificarse fácilmente en Wolfram Alpha:
In[]:=
Out[]=
1.021
O simplemente revisando en línea:
El precio del oro se da de manera estándar por el valor de una onza troy, equivalente a aproximadamente 31 gramos:
In[]:=
UnitConvert,"Grams"//N
Out[]=
Por lo tanto, cuando se lista el precio del oro, no resulta inmediatamente obvio cuál es el valor de 1 kg de oro, a menos que se haga la conversión de unidades.
Aumento actual del oro
Aumento actual del oro
◼
Los futuros del oro superan los 4000 dólares por onza por primera vez
◼
El oro supera los 4000 dólares por primera vez impulsado por el cierre del gobierno de EE. UU.
◼
Los inversionistas ansiosos empujan el oro por encima de los 4000 dólares la onza por primera vez
Importación de datos
Importación de datos
Comencemos importando datos de bitcoin (BTC) valorados en dólares estadounidenses:
In[]:=
FinancialData["BTC/USD",{2015},Method->"Legacy"]BTCdata=TimeSeries@%
Out[]=
Out[]=
TimeSeries
Como mencioné antes, los datos de precios del oro importados generalmente se dan por el valor de una onza troy de oro, el cual es equivalente a 31 gramos aproximadamente.
Para convertir el precio de 1 kg de oro, necesitamos calcular el factor de multiplicación de manera proporcional a la razón de las masas:
Para convertir el precio de 1 kg de oro, necesitamos calcular el factor de multiplicación de manera proporcional a la razón de las masas:
In[]:=
N
Out[]=
32.1507
Por lo tanto, los datos del precio para 1 kg de oro se obtienen como:
In[]:=
FinancialData["XAU/USD",{2015},Method->"Legacy"];MapAtN#&,%,{All,2}GoldData=TimeSeries@%
Out[]=
Out[]=
TimeSeries
Finalmente, la representación gráfica se calcula como:
In[]:=
DateListPlot[{GoldData,BTCdata},PlotTheme->"Detailed"]
Out[]=
Métodos de datos alternativos: Entity Framework y más
Métodos de datos alternativos: Entity Framework y más
Entity Framework es otro excelente método para obtener datos financieros. Consideremos este código que extrae los datos del oro de una manera diferente:
In[]:=
Entity["Element","Gold"][Dated[EntityProperty["Element","Price"],DateInterval[{{2015},Today}]]]
Out[]=
TimeSeries
Debidamente formateado, se ve compacto y agradable:
In[]:=
Out[]=
TimeSeries
Para bitcoin, podemos usar otro método alternativo, , el cual utiliza información de tasas de cambio proporcionada por para la conversión entre unidades monetarias.
In[]:=
CurrencyConvert["BTC","USDollars",{{2015},Today}]
Out[]=
TimeSeries
Diseño final de los gráficos
Diseño final de los gráficos
In[]:=
header=Style["Post-COVID Convergence: 1 Bitcoin and 1kg Gold",43,GrayLevel[.9],FontFamily->"DIN Condensed"];sub1=Style["🔒 GOLD: safety asset 🔥 BITCOIN: risk asset",20,GrayLevel[.75],FontFamily->"Georgia"];sub2=Style[" 🦋 Is perception changing?",20,GrayLevel[.75],FontFamily->"Georgia"];footer1=Style["Data | Tools: WOLFRAM Language",15,GrayLevel[.5],FontFamily->"Verdana"];footer2=Style["𝕏.com/SUPERFLOW",15,GrayLevel[.5],FontFamily->"Verdana"];FramedColumnheader,Row[{sub1,sub2}],"",DateListPlot{GoldData,BTCdata},PlotTheme->"Detailed",PerformanceGoal->"Speed",PlotStyle->,,FrameStyle->GrayLevel[.75],BaseStyle->19,ImageSize->700,AspectRatio->.55GoldenRatio,FrameTicks->{{{{40000,"40K"},{80000,"80K"},{120000,"120K"}},None},{Automatic,None}},PlotLegends->Placed[Style[#,21,GrayLevel[.75],FontFamily->"Copperplate"]&/@{"Gold, 1kg, USD","Bitcoin, BTC, USD"},{Left,Top}],Epilog->Text[Style["COVID",21,GrayLevel[.75],FontFamily->"Copperplate"],{AbsoluteTime[{2020,3,11}],105000},{Left,Bottom}],,Thickness[.005],Arrow[{{AbsoluteTime[{2020,3,11}],105000},{AbsoluteTime[{2020,3,11}],60000}}],DateListPlot{GoldData,BTCdata},PlotTheme->"Detailed",PerformanceGoal->"Speed",PlotStyle->,,BaseStyle->19,FrameStyle->GrayLevel[.75],ImageSize->700,AspectRatio->.55GoldenRatio,FrameTicks->{{{{40000,"40K"},{80000,"80K"},{120000,"120K"}},None},{Automatic,None}},PlotRange->{{{2020,1,1},Now},All},Epilog->,Thickness[.005],Arrow[{{AbsoluteTime[{2020,3,11}],105000},{AbsoluteTime[{2020,3,11}],60000}}],DateListPlotBTCdataGoldData,PlotTheme->"Detailed",PerformanceGoal->"Speed",PlotStyle->Cyan,BaseStyle->19,FrameStyle->GrayLevel[.75],PlotStyle->Red,ImageSize->700,Filling->1,AspectRatio->.55GoldenRatio,FrameTicks->{{{.2,.6,1,1.4},None},{Automatic,None}},PlotRange->{{{2020,1,1},Now},{0,1.4}},FrameLabel->{None,Style["",0]},PlotLegends->Placed[Style["1 BTC / 1kg GOLD, in USD",GrayLevel[.9],21,FontFamily->"Copperplate"],{Left,Top}],Epilog->{Green,Dashed,Thickness[.005],Line[{{AbsoluteTime[{2010,3,11}],1},{AbsoluteTime[{2030,3,11}],1}}]},,Thickness[.005],Arrow[{{AbsoluteTime[{2020,3,11}],.7},{AbsoluteTime[{2020,3,11}],.3}}],"",Row[{footer1,Spacer[300],footer2}],Alignment->Center,Background->Black,FrameMargins10
CITE ESTE CUADERNO
CITE ESTE CUADERNO
Convergencia post-COVID: 1 BITCOIN y 1kg de ORO
por Vitaliy Kaurov
Comunidad Wolfram, STAFF PICKS, 9 de octubre de 2025
https://community.wolfram.com/groups/-/m/t/3558536
por Vitaliy Kaurov
Comunidad Wolfram, STAFF PICKS, 9 de octubre de 2025
https://community.wolfram.com/groups/-/m/t/3558536