Can you extract the Style attributes from a variable. For example:
var = Style["aString", Bold, 24]
You can get back "aString" by using ToString[var] but I am not able to get the attributes {Bold, 24}.
$\begingroup$
$\endgroup$
Add a comment
|
1 Answer
$\begingroup$
$\endgroup$
6
Examine its FullForm:
var = Style["aString", Bold, 24];
var // InputForm
(* Out: Style["aString", Bold, 24] *)
Exactly as you typed in. You can manipulate it just as you would any Mathematica expression. For example:
List @@ Rest[var]
(* Out: {Bold, 24} *)
answered Dec 27, 2013 at 0:57
-
$\begingroup$ Did not think of replacing the Head on var. Perfect, thank you so much. Peter $\endgroup$– pjc42Commented Dec 27, 2013 at 1:10
-
$\begingroup$ There ought to be a way to compare
Style["aString", Bold, 24]andStyle["aString", FontWeight -> Bold, FontSize -> 24]... $\endgroup$– rm -rf ♦Commented Dec 27, 2013 at 1:25 -
$\begingroup$ @rm-rf Isn't there?
var2 = Style["aString", Bold, 24]; var1 = Style["aString", FontWeight -> Bold, FontSize -> 24]; OrderedQ[{var2, var1}]returns a reasonable result. Do you wantvar1andvar2to be the same? $\endgroup$ Commented Dec 27, 2013 at 1:33 -
$\begingroup$ @MarkMcClure Yes, the same. I understand why Mathematica sees them differently and why
SameQisFalse... I was just surprised that both forms didn't have the same underlying representation (I thoughtStyle["aString", FontWeight -> Bold, FontSize -> 24]would auto-evaluate toStyle["aString", Bold, 24]or something like that). $\endgroup$– rm -rf ♦Commented Dec 27, 2013 at 1:36 -
$\begingroup$ @rm-rf So you'd like
Equal[var2,var1]to evaluate toTruein the same way thatEqual[1,1.0]evaluates. I can see that. But, are there other situations whereEqual[a,b]evaluates toTruewhereaandbare non-identical, non-numeric expressions? I'm not sure off the top of my head, but I haven't been thinking about code so much lately. It's a little far afield of the OP's intention, perhaps. :) $\endgroup$ Commented Dec 27, 2013 at 1:53