SHARE
TWEET

Untitled

a guest Feb 19th, 2019 66 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. angledDivider[text1_,text2_]:=Graphics[{
  2.     {
  3.         Directive[Thick,White],
  4.         InfiniteLine[{{-1,1},{1,-1}}]
  5.     },
  6.     {
  7.         Text[Style[text1,Directive[Bold,White,FontSize->11]],{-0.42,-0.4}],
  8.         Text[Style[text2,Directive[Bold,White,FontSize->11]],{0.42,0.4}]
  9.     }
  10. },PlotRange->{{-1,1},{-1,1}},ImageSize->{70,70},Background->Gray,ImagePadding->None];
  11.      
  12. TextGrid[{
  13.     {angledDivider[...,...],...},
  14.     ...
  15. },
  16.     Frame->All,
  17.     FrameStyle->Directive[Thick,White],
  18.     Background->{{},{},{...}},
  19.     ItemStyle->{{{...},{},{...}},
  20.     ItemSize->0,
  21.     Alignment->{Center,Center},
  22.     Spacings->{{3->0.25,4->0.15,5->0},{3->0.25,4->0.15,5->0}}
  23. ];
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top