In[]:=
[◼]
ChatTechColors
["Data"]["Orange"]
Out[]=
See all of the available info:
In[]:=
FullForm
[◼]
ChatTechColors

Out[]//FullForm=
ResourceFunction[ResourceObject[Association[Rule["Name","ChatTechColors"],Rule["UUID","e94a8649-0716-452b-8a07-06cee4cfd4e3"],Rule["ResourceType","Function"],Rule["ResourceLocations",List[CloudObject["https://www.wolframcloud.com/obj/sw-writings0/Resources/e94/e94a8649-0716-452b-8a07-06cee4cfd4e3"]]],Rule["Version",None],Rule["DocumentationLink",URL["https://www.wolframcloud.com/obj/sw-writings0/ChatTech/ChatTechColors"]],Rule["ExampleNotebookData",Automatic],Rule["FunctionLocation",CloudObject["https://www.wolframcloud.com/obj/sw-writings0/Resources/e94/e94a8649-0716-452b-8a07-06cee4cfd4e3/download/DefinitionData"]],Rule["ShortName","ChatTechColors"],Rule["SymbolName","FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`ChatTechColors"]]]]
Pull the "FunctionLocation" CloudObject:
In[]:=
Import[CloudObject["https://www.wolframcloud.com/obj/sw-writings0/Resources/e94/e94a8649-0716-452b-8a07-06cee4cfd4e3/download/DefinitionData"]]
Out[]=
UUIDe94a8649-0716-452b-8a07-06cee4cfd4e3,ExpressionHoldComplete
[◼]
ChatTechColors
,DefinitionLanguage`DefinitionList
[◼]
ChatTechColors
DownValuesHoldPattern
[◼]
ChatTechColors
[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`key_]Association[NormalFunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFun,LightFunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunLighter,DarkFunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunDarker,OrangeFunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange,OrangeShortFunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange2,DataAssociation[Orange
,Teal
]][FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`key],FormatValuesHoldPatternMakeBoxes
[◼]
ChatTechColors
,_FunctionResource`MakeResourceFunctionBoxes[ChatTechColors],Messages{HoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`ChatTechColors::usage]ResourceFunction["ChatTechColors"]},FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOwnValuesHoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFun]Blend{-1,
},-
1
2
,
,{0,
},
1
2
,
,{1,
},#1&,FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunLighter{OwnValues{HoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunLighter](Lighter[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFun[#1],0.2]&)}},FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunDarker{OwnValues{HoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunDarker](Darker[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFun[#1],0.15]&)}},FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange{OwnValues{HoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange](Blend[(ColorConvert[#1,RGBColor]&)/@{
,
,
,
,
,
,
},#1]&)}},FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange2{OwnValues{HoldPattern[FunctionRepository`$e94a86490716452b8a0706cee4cfd4e3`colorFunOrange2](Blend[(ColorConvert[#1,RGBColor]&)/@{
,
,
,
},#1]&)}},RequiresInitializationFalse,TimestampDateObject[{2023,2,14,1,0,38.421801},Instant,Gregorian,0.],PacletInformationNameResourceSystemClient,Version1.25.0,MathematicaVersion12.3+,LoadingAutomatic,Extensions{{Kernel,Symbols{System`PublisherID,System`ResourceAcquire,System`ResourceObject,System`ResourceRegister,System`ResourceRemove,System`ResourceSearch,System`ResourceSubmissionObject,System`ResourceSubmit,System`ResourceSystemBase,System`ResourceSystemPath,System`ResourceUpdate,System`ResourceVersion},RootKernel,Context{ResourceSystemClientLoader`,ResourceSystemClient`}},{FrontEnd,PrependTrue}},Location/Applications/Mathematica13.2.app/Contents/SystemFiles/Components/ResourceSystemClient,SystemInformationKernelSystemIDMacOSX-x86-64,ReleaseID13.2.0.0 (8085784, 2022111816486),CreationDateDateObject[3877801829,TimeZone0],OperatingSystemVersionmacOS 11.6.2 (20G314),FrontEndSystemIDMacOSX-x86-64,ReleaseID13.2.0.0 (8085784, 202211189801),CreationDateDateObject[3877803038,TimeZone0],OperatingSystemVersion11.6.2 (20G314),PacletVersion1.8.0
You can see the meat of the color part here, I think—for the voronoi cell, it just grabs this orange color:
In[]:=
Association["Orange"
,"Teal"
]["Orange"]
Out[]=
For the color function, I think it uses this color scheme:
In[]:=
chatTechColors=Blend{-1,
},-
1
2
,
,{0,
},
1
2
,
,{1,
},#1&
Out[]=
Blend{-1,
},-
1
2
,
,{0,
},
1
2
,
,{1,
},#1&
In[]:=
Plot3D[Sin[xy],{x,-π,π},{y,-π,π},ColorFunction->(chatTechColors[#3]&),ColorFunctionScaling->False]
Out[]=
(ColorFunctionScaling is set to false because the Blend has specific values at which the specified colors should be used, which range from -1 to 1.)