Guest User

Untitled

a guest
Jul 20th, 2018
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.88 KB | None | 0 0
  1. rule = {beta -> 4, alpha -> 2, x -> 4, z -> 2, w -> 0.8}
  2. Select[rule, beta]
  3. Select[rule, beta &]
  4. Select[rule, beta -> _ &]
  5.  
  6. rule = {beta -> 4, alpha -> 2, x -> 4, z -> 2, w -> 0.8};
  7.  
  8. FilterRules[rule, beta]
  9. (* {beta -> 4} *)
  10.  
  11. FilterRules[rule, {beta, alpha}]
  12. (* {beta -> 4, alpha -> 2} *)
  13.  
  14. KeyTake[rule,{alpha, x}]
  15. (* or *) KeyTake[{alpha,x}][rule]
  16. (* <|alpha->2,x->4|> *)
  17. Normal@KeyTake[rule,{alpha, x}]
  18. (* {alpha->2,x->4} *)
  19.  
  20. KeySelect[rule, MatchQ[#,alpha|x]&]
  21. (* or *) KeySelect[MatchQ[#,alpha|x]&][rule]
  22. (* <|alpha->2,x->4|> *)
  23. Normal@KeySelect[rule, MatchQ[#,alpha|x]&]
  24. (* {alpha->2,x->4} *)
  25.  
  26. Select[rule, MemberQ[{beta, alpha}, #[[1]]] &]
  27.  
  28. Cases[rule, _[beta | alpha, _]]
  29.  
  30. {beta -> 4, alpha -> 2}
  31.  
  32. {beta, alpha} /. (# -> Rule[##] & @@@ rule)
  33.  
  34. Pick[rule, Keys@rule, alpha | beta]
  35.  
  36. {beta -> 4, alpha -> 2}
  37.  
  38. Rule[#, (Association@rule)[#]] & /@ {beta, alpha}
Add Comment
Please, Sign In to add comment