R-packages – /trunk/cluster/src/twins.c

Rev 8488 – finally eliminate `dv <- c(0., dv)` i.e. prepend "0."

maechler — Tue, 14 Jan 2025 09:03:47 +0000

maechler – 16 file(s) modified
finally eliminate `dv <- c(0., dv)` i.e. prepend "0."

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/clara.q
~ /trunk/cluster/R/daisy.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/R/fanny.q
~ /trunk/cluster/R/pam.q
~ /trunk/cluster/src/clara.c
~ /trunk/cluster/src/daisy.c
~ /trunk/cluster/src/dysta.c
~ /trunk/cluster/src/ind_2.h
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/agnes-ex.Rout.save
~ /trunk/cluster/tests/pam.Rout.save

Rev 8487 – dysta(): 3 non-pointer args; drop `--`

maechler — Mon, 13 Jan 2025 14:32:22 +0000

maechler – 7 file(s) modified
dysta(): 3 non-pointer args; drop `<var>--`

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/dysta.c
~ /trunk/cluster/src/ind_2.h
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c

Rev 8484 – new INLINE util dys_2(dys, i, j) not accessding dys[0]; tests/ ...

maechler — Sun, 12 Jan 2025 20:53:11 +0000

maechler – 11 file(s) modified
new INLINE util dys_2(dys, i, j) *not* accessding dys[0]; tests/ output tweaks

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/test-tools.R
~ /trunk/cluster/R/clara.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/src/clara.c
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/ind_2.h
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/agnes-ex.R
~ /trunk/cluster/tests/agnes-ex.Rout.save

Rev 8478 – tweaks/cosmetics (before "re-write" without dys <- c(0, *))

maechler — Thu, 09 Jan 2025 08:40:23 +0000

maechler – 5 file(s) modified
tweaks/cosmetics (before "re-write" without dys <- c(0, *))

~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/twins.c

Rev 8476 – less warnPartialMatch* (for KH)

maechler — Thu, 02 Jan 2025 09:36:23 +0000

maechler – 15 file(s) modified
less warnPartialMatch* (for KH)

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/man/agnes.Rd
~ /trunk/cluster/man/clara.Rd
~ /trunk/cluster/man/clusGap.Rd
~ /trunk/cluster/man/diana.Rd
~ /trunk/cluster/man/ellipsoidhull.Rd
~ /trunk/cluster/man/medoids.Rd
~ /trunk/cluster/man/plot.agnes.Rd
~ /trunk/cluster/man/plot.diana.Rd
~ /trunk/cluster/man/summary.clara.Rd
~ /trunk/cluster/R/silhouette.R
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/agnes-ex.R
~ /trunk/cluster/tests/agnes-ex.Rout.save

Rev 8465 – tweaks from mv Fortran -> C: dysta() returns; dysta, dysta3 ...

maechler — Fri, 06 Dec 2024 10:49:50 +0000

maechler – 11 file(s) modified
tweaks from mv Fortran -> C: dysta() *returns*; dysta, dysta3 no longer exported

~ /trunk/cluster/.Rbuildignore
~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/src/clara.c
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/dysta.c
~ /trunk/cluster/src/fanny.c
~ /trunk/cluster/src/init.c
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/dysta-ex.R

Rev 8457 – translate last remaining Fortran dysta.f and daisy.f to *.c adapting ...

maechler — Fri, 04 Oct 2024 15:42:51 +0000

maechler – 14 file(s) modified
translate last remaining Fortran dysta.f and daisy.f to *.c adapting calls,headers

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/daisy.q
~ /trunk/cluster/R/mona.q
~ /trunk/cluster/src/cluster.h
+ /trunk/cluster/src/daisy.c
x /trunk/cluster/src/daisy.f
+ /trunk/cluster/src/dysta.c
x /trunk/cluster/src/dysta.f
~ /trunk/cluster/src/init.c
~ /trunk/cluster/src/mona.c
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c

Rev 7237 – one more (small albeit!) step towards getting a diana(*, stop.at.k) ...

maechler — Thu, 23 Jun 2016 00:42:33 +0000

maechler – 6 file(s) modified
one more (small albeit!) step towards getting a diana(*, stop.at.k) option

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/inst/NEWS.Rd
~ /trunk/cluster/man/diana.Rd
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/README
~ /trunk/cluster/src/twins.c

Rev 6829 – using Merge(i,j) macro -- more local declarations; slightly changed 'trace' ...

maechler — Wed, 22 Oct 2014 08:27:20 +0000

maechler – 1 file(s) modified
using Merge(i,j) macro -- more local declarations; slightly changed 'trace' output

~ /trunk/cluster/src/twins.c

Rev 6801 – agnes() and diana() finally get, respectively work with a "trace.lev" ...

maechler — Thu, 04 Sep 2014 15:47:41 +0000

maechler – 9 file(s) modified
agnes() and diana() finally get, respectively work with a "trace.lev" option.
Further: agnes(*, method="flexible", par.method = c(a1, a2, b, c)), i.e.,
length(alpha) == 4, finally works *correctly* {confirmed with single,complete tests}

~ /trunk/cluster/man/agnes.Rd
~ /trunk/cluster/man/diana.Rd
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/init.c
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/agnes-ex.R
~ /trunk/cluster/tests/agnes-ex.Rout.save

Rev 6799 – - agnes(.. "flexible") with length(par.method) == 4 had ...

maechler — Thu, 04 Sep 2014 08:00:09 +0000

maechler – 6 file(s) modified
- agnes(.. "flexible") with length(par.method) == 4 had a thinko (!!)
- not using as.double(0) when DUP=FALSE

~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/man/diana.Rd
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/R/pam.q
~ /trunk/cluster/src/twins.c

Rev 6712 – use error(_(..)) instead of REprintf() for errors, and add ...

maechler — Thu, 27 Mar 2014 11:02:14 +0000

maechler – 6 file(s) modified
use error(_(..)) instead of REprintf() for errors, and
add po/cluster.pot for future translations of (the few) C level error messages

+ /trunk/cluster/inst/po/en@quot/LC_MESSAGES/cluster.mo
+ /trunk/cluster/po/cluster.pot
~ /trunk/cluster/po/translators.txt
~ /trunk/cluster/src/clara.c
~ /trunk/cluster/src/pam.c
~ /trunk/cluster/src/twins.c

Rev 6592 – new agnes() method = "gaverage", generalized from contribution by Pierre ...

maechler — Wed, 06 Nov 2013 11:10:27 +0000

maechler – 7 file(s) modified
new agnes() method = "gaverage", generalized from contribution by Pierre Roudier

~ /trunk/cluster/ChangeLog
~ /trunk/cluster/DESCRIPTION
~ /trunk/cluster/man/agnes.Rd
~ /trunk/cluster/NAMESPACE
~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/src/twins.c
~ /trunk/cluster/tests/clara-151.R

Rev 6588 – cosmetic doc changes "K&R(1990)"

maechler — Tue, 05 Nov 2013 11:39:54 +0000

maechler – 7 file(s) modified
cosmetic doc changes "K&R(1990)"

~ /trunk/cluster/man/agnes.Rd
~ /trunk/cluster/man/daisy.Rd
~ /trunk/cluster/man/fanny.Rd
~ /trunk/cluster/man/pam.Rd
~ /trunk/cluster/man/silhouette.Rd
~ /trunk/cluster/NAMESPACE
~ /trunk/cluster/src/twins.c

Rev 6507 – cosmetic changes (mostly from December 2011!)

maechler — Mon, 10 Jun 2013 14:54:06 +0000

maechler – 1 file(s) modified
cosmetic changes (mostly from December 2011!)

~ /trunk/cluster/src/twins.c

Rev 5980 – meet() is no longer needed

maechler — Thu, 22 Dec 2011 08:17:22 +0000

maechler – 3 file(s) modified
meet() is no longer needed

~ /trunk/cluster/src/cluster.h
x /trunk/cluster/src/meet.f
~ /trunk/cluster/src/twins.c

Rev 5978 – more twins.c code cleanup; export coefHier()

maechler — Wed, 21 Dec 2011 12:01:53 +0000

maechler – 7 file(s) modified
more twins.c code cleanup; export coefHier()

~ /trunk/cluster/ChangeLog
~ /trunk/cluster/man/coef.hclust.Rd
~ /trunk/cluster/NAMESPACE
~ /trunk/cluster/R/coef.R
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/init.c
~ /trunk/cluster/src/twins.c

Rev 5976 – twins.f -> twins.c -- using C instead of Fortran

maechler — Wed, 21 Dec 2011 09:36:17 +0000

maechler – 6 file(s) modified
twins.f -> twins.c -- using C instead of Fortran

~ /trunk/cluster/R/agnes.q
~ /trunk/cluster/R/diana.q
~ /trunk/cluster/src/cluster.h
~ /trunk/cluster/src/init.c
+ /trunk/cluster/src/twins.c
x /trunk/cluster/src/twins.f