R devel - Jan 1999 - Some outer() suggestions

This message is in MIME format.  The first part should be readable text,
  while the remaining parts are likely unreadable without MIME-aware tools.
  Send mail to mime@docserver.cac.washington.edu for more info.

---559023410-342241519-916419809=:25543
Content-Type: TEXT/PLAIN; CHARSET=US-ASCII
Content-ID: <Pine.GSO.3.96.990115171305.25543M@laplace>

I attach outer.tar.gz which contains outer() as extended for arrays, after
noting the suggestion made in the current help file for outer().  It also
has kronecker() and, to help with function matching, match.fun(). 
Documentation is also included.  Note that in the documentation for
match.fun() I suggest that this be used within functions such as apply(),
tapply() etc, and sweep().  Just a suggestion! 

I hope these are helpful.  Jonathan.

Jonathan Rougier                       Science Laboratories
Department of Mathematical Sciences    South Road
University of Durham                   Durham DH1 3LE

"[B]egin upon the precept ... that the things we see are to be 
 weighed in the scale with what we know"  (Meredith, 1879, The Egoist)


---559023410-342241519-916419809=:25543
Content-Type: APPLICATION/octet-stream; name="outer.tar.gz"
Content-Transfer-Encoding: BASE64
Content-ID: <Pine.GSO.3.96.990115171534.25543N@laplace>
Content-Description: 

H4sICEJwnzYAA291dGVyLnRhcgDtWVtv2zgW7mv0KzguCtiF6rUdx9ltJw+Z
AQLMLLIDJB1MjLoPjMXYqmlRJaVc1tB/3++QtC620+ylaRe75kMiiefGcw4P
z2cueTadd2/ypHvx4rlGr9/rjYbDF71eb9A/Gtj/w4F9t2NE30aj4fFodDzq
HeJ7/3Bw3HvRezaLaiM3GddQGS1579NUP0qH+S/K6dlVHbpF9Q+/tpnPNZbr
+LMf3zD8m2axSlj77Pe/hSwSZiqSiJ2wsw4LVgHzI75h7dh0p3Ou+TQTmqg7
oGAbYyYyJ2ipIgEprbX8VqekFdIIK5BorCD2Q4OSrbbkgoqsjUTKtRFtk1+b
LM7yzPF3tuhJvF/LDiv/FWsbVptMpe2UG+htTVqtkFluPLLYsERljJcOxeSj
eo1ISVurZnjRdA/kBkXwzPHvXkTPo+HJ/T84PDyu9n9/ZPf/cDjY7/9vMCYJ
X4pVmQVFEEywl6RYndOnMoENu9FqWRUI7DzwYe8b4sgNn9WENKrHyVmHSLiM
uWnq4XqWL0WSGezwSZyJ5Qp8xerM6wiZmDFuoMoYEbFMsckUO3OlsNF10S3W
TF5PsfpZJZlWkt3NRTYXmjiM4BqryJMI74lK3pQLUNefxDQzEEOmkAwdpzSz
CuzKhfHqyCYSVW3mkDRoUZ+f8oRdC8aDsiZa6x1F63WrCMFfzqFy6DiZ1Ulu
tIhAFSjdUFQSpEt+X3QZuxBZrhEN6BNagxq1LVHM+hUig3J9KEE3CuvuBsEv
N17IOiLvYY77UsWD3cVSMqnUwnkrETybB7tcBspszuBhNotvRcIogd4xRS6/
i10xrzwTpCpGhJ0Dd0gjOUltNQZlOBGaZ4Isv8xnM2GIiNMfzMLJcTKVeYSM
iOFzDoVVjpocweYmcPp5msqHAsIja62MFyJs5JCdch/MnRApJVUwueUyF6vT
KtfXzq0HHLauDa2CYdl5ns2VXv2qEjgQMxcqn8VQhikjrMDVT/nsT2fwb65F
sQpOa4mx3hJVtlttWDiXd/zBOFvcbuBBLU8oEHB8ZhOTyHc6ex7PaGPkKREG
fnPIGB4uY2oQTRvSrrNYcGnUytkykXGy8DkDS4uCSMQ9X6ZSYBO/ZJfEzI09
SpH1naAqCfb1JfvtFlmisW+ZDYHTy9ktrFM6cN9wtPffHtV47efO5od6f/K+
ocpOQx3M+97l9b9+WF89Y+9P44nzv987Gm72/4Oj4b7//xaj3HJV738VsrFt
ZqktfY3WtdvtNvp/3383zvuqeb2iOW5QITR/aF91NmFDkkvZTu5tBx8vqdQY
UO3CD47I1YZ2i+oUjJEimWXzNlgtV8k0bqgdP6L2oaF2vFvtw5fVjutq8cEQ
+dRbFDJP0jRMi7QNp9I/L4lI/WND4NWa/Go930WMEIqKuKTVqOt22XbNiIKP
HQXMGmIahrpFE1PHmZzch1htUx5VzdYr9apFJN1TatvWBfh75+p+fP3h6/+z
YT8aT+G/3lG/hv+Obf0/7h3v6/83GA7/uX64xH6/2UMh1SrK0TWqG1dgalDP
dWrVSXFSnhPBPZu8UpNX7CGoYJ8X797adr6zEwBeFWi8XeWlFtuqrZDe+Iuz
FjxW4Ila5BzogJ7m63bTL8mELM5wfj0AT9TKP2efcwXk4fFZJXoSqcwUK2UB
Ipdlm25xDSDJJkQlU3Yhy/ebhpBvyTrnX899VQcmY9v9U7tuafzX08J1zijq
IjG0Wvd96xQqHFYNhBQWV3j2D3HIPtmAhWyBc8Y+fqQf+ugMqWY/IsAfLEHg
3ijEhENr4GSJHWTBb+X6u3kMYCHuU4sXeRZIwQnG3ama62iNjlClHkh5Ky2M
hBjnFeDAPyysgRMeIBTncWidtj7RyIm7PWcxLUKcamGEvrWY0kMZykEHrNa+
c2ddAdismyixvQn3A8B9+n0PiwZ0S2YIvf11pIL7naeh4DawWmiViOkCBFvA
6jyXWZzKeMpdavNrKfweBFQKCS8BXZ1i7Ryu0UIwoEVEZpvrB8+2wexF4I/f
vo2nPZL6nx1l0n3H+5/jHfc/h8f9/fn/DUYZ/38CAwICHmyhu4Mt4HXwEgdi
5A6oPMFBazESYJgWn/NYiyg4kBExNaEce7MBsoIDgm4y+rGHxwNH1YRaBJP6
IXsjI6KmuxJPOK4RjitCR6dSD5s2mhi/SJgfpXQyiBkkDFEZQ4YqOQjZKGSH
mMcsmI343OZSJTN4aOvYLangFw8kszbwso7v21EK0DVV8mTQ+RCCdRD2Ox8b
dnGch8u2fYXElITF/r3j8Su54rXX5jkdcFvoBnIrw/sYeqvt/+92/zMYjbbu
f45oKz2XQfXxf77/Xf9ftR4lBvhrWRjWTXPVktWAQMm5EwxcoYdYaDQR4xoa
qCnzXxzR7juhrwgJ3lVd//P3+j+rZZpTU2tvSuxdgYyJc7HpWAsCbGtMvg2D
nb1s2XM3HY4GX1dXQlZC8AhEWMOLjepRvK1ubJzOoOyfI2Xvsef8VtQuB/Ll
NYyH0ZVo15CbJZdSaI9UYrq6i+iiZtMOsJr479Tii3JZMHeKOTT3JqD5/NqW
yykcSN8z+AmSrh/QxS6quxgYDCEMZXwJmEHNL7QE5DeAD/wjSnd5ZClqd3rt
+/KXsqKGCmwePgELqvz10CBo3gQ+BQ1srmhxA84E66ObVpwL7FTOxLXm7Hcj
bnJp9V1m6NxNFk/h4Ms5f0DTf9Fll4JrKUL2q5on7I9YAhXRii9tHPp/+fPg
3wEfDutsAQ8T0yMzUy653gAUwbn/FZhOtf7bUXmsvWPnATKhOnzoFD3vnJwM
kXXndA30k1TTBVKCz/weo7ytyGmiTaAExP55XUjOyXt7MLIf+7Ef+/Efj38A
iJfMzAAqAAA---559023410-342241519-916419809=:25543--
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To:
r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._

Thank you Jonathan, 
for your submitted suggestions.

to have a more generally working (and [dim]names preserving) "outer()"
has
been (some where low) on my todo list, for a while now.

----
Something for all R package / code writers :
	  --------------------------------
When writing  *.Rd files {aka man pages}:
Please use at least one \keyword{...} line at the end
(use a keyword from  R.../doc/KEYWORDS
  ... are these in the Windows version?)
These are important for several indices (and may become more important in
the future).

---
A few more remarks of (half) general interest:

- Concerning "kronecker",  couldn't we use

    %x%

  as an .Alias for the kronecker product (instead of "%kr%" which you
proposed)
  Does anyone see a reason against it?

- match.fun() [your new proposal]:

  Why should it give an error [stop()] instead of return NA or NULL or
  something like that when there's no function match ?

Martin
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To:
r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._