Scheme using modulo operator on a list -

-

i found max value of list , want return numbers except numbers have modulo equal 0 max value , im not quite sure how use modulo operator on whole list numbers need can lead me in right direction have far 

(define (findlargest a_list) (if (null? a_list) ;if empty list     #f             ;its false     (let loop ((a_list (cdr a_list)) ;binds loop variable a_list value of cdr a_list(second , subsequent items in list)                (maxval (car a_list))) ;maxval set car of a_list (first item of list)       (cond ((null? a_list) maxval)   ;if list empty return max             ((> (car a_list) maxval)  ;checks see if current element > max              (loop (cdr a_list) (car a_list))) ;find new max             (else         (loop (cdr a_list) maxval)));keeps same max

you're reinventing wheel findlargest, there's built-in procedure that:

(define (findlargest lst)   (apply max lst))

now, regarding question - looks perfect job filter:

(define (filter-max-modulo lst)   (let ((max-val (findlargest lst)))     (filter (lambda (val)               (not (zero? (modulo val max-val))))             lst)))

for example:

(filter-max-modulo '(0 -2 -4 -3 -7 -1 2)) => '(-3 -7 -1)

Comments

Post a Comment

Popular posts from this blog

java - Run spring boot application error: Cannot instantiate interface org.springframework.context.ApplicationListener -

-
i have spring project , try make use spring boot , run @ embadded tomcat following : https://spring.io/guides/gs/rest-service/ this application //@configuration //@enableaspectjautoproxy @springbootapplication @componentscan(basepackages = "gux.prome") public class application { public static void main(string[] args) { springapplication.run(application.class, args); } } if use maven command: mvn spring-boot:run , project starts fine, need debug , run main method @ intelij, exception occurs: exception in thread "main" java.lang.illegalargumentexception: cannot instantiate interface org.springframework.context.applicationlistener : org.springframework.boot.logging.classpathloggingapplicationlistener @ org.springframework.boot.springapplication.createspringfactoriesinstances(springapplication.java:414) @ org.springframework.boot.springapplication.getspringfactoriesinstances(springapplication.java:394) @ org.springframework.bo...
Read more

reactjs - React router and this.props.children - how to pass state to this.props.children -

-
i'm using react-router first time , don't know how think in yet. here's how i'm loading components in nested routes. entry point .js reactdom.render( <router history={hashhistory} > <route path="/" component={app}> <route path="models" component={content}> </route> </router>, document.getelementbyid('app') ); app.js render: function() { return ( <div> <header /> {this.props.children} </div> ); } so child of app content component sent in. i'm using flux , app.js has state , listens changes, don't know how pass state down this.props.children. before using react-router app.js defines children explicitly, passing state natural don't see how now. using couple of react helper methods can add state, props , whatever else this.props.children render: function() { var children = react.ch...
Read more

Excel VBA "Microsoft Windows Common Controls 6.0 (SP6)" Location Changes -

-
i have excel workbook used generate quotations customers. there main page user inputs data, , there buttons generate various pdfs , send them customer. however, 1 user consistently getting error preventing generating , sending pdfs. i beleive "microsoft windows common controls 6.0 (sp6)". it's installed on users' computers. on mine, location "c:\windows\syswow64\mscomctl.ocx" on others "c:\windows\system32\mscomctl.ocx" the user experiencing issues on 32-bit machine, "mscomctl.ocx" file should in system32. have manually put in there, , pointed common controls reference in vba it. issue seems keep reverting looking in syswow64. since folder doesn't exist, can't find it, , can't produce pdfs. i thought perhaps issue user running older version of office (2007) there users on 2013 , 2016. thought perhaps mixture of 64-bit , 32-bit users. user gets sent workbook other users (as quotation process goes further, gets passed ...
Read more