Added displine

This commit is contained in:
Waldir Leoncio 2019-12-17 16:48:22 +01:00
parent 6a1f10edd4
commit 2fa3d06083
3 changed files with 15 additions and 7 deletions

View file

@ -609,13 +609,6 @@ admix1 <- function(tietue) {
# %---------------------------------------------------------------
# function dispLine;
# disp('---------------------------------------------------');
# %--------------------------------------------------------------------------
# function tulostaAdmixtureTiedot(proportions, uskottavuus, alaRaja, niter)
# h0 = findobj('Tag','filename1_text');
# inputf = get(h0,'String');

4
R/displine.R Normal file
View file

@ -0,0 +1,4 @@
#' @title Print a separator line
dispLine <- function() {
cat('---------------------------------------------------\n')
}